vivimi 3N0IZIQ] 



Mike Grace 




GRUPPO 

EDITORIALE 

JACKSON 





























ADVENTURE 

Commodore 

64 


Mike Grace 



GRUPPO 

EDITORIALE 

JACKSON 


Copyright per l’edizione originale: 

Sunshine Books - 1983 

Titolo originale: COMMODORE 64 ADVENTURES 

Copyright per l'edizione italiana: 

GRUPPO EDITORIALE JACKSON - Febbraio 1985 

TRADUZIONE: Flavio Brunelli 
GRAFICA E IMPAGINAZIONE: Cristina De Venezia 
SUPERVISIONE TECNICA: Daria Gianni 
REVISIONI E PROGRAMMI: Emilio Delle Piane 
COPERTINA: Marcello Longhini 

FOTOCOMPOSIZIONE. SYSTEM GRAPHIC - Cologno Monzese (MI) 

STAMPA: Centro Grafico Milano - Via A. Gatto, 14 - Ponte Sesto di Rozzano (MI) 

Tutti i diritti sono riservati. Stampato in Italia. Nessuna parte di questo libro può essere 
riprodotta, memorizzata in sistemi di archivio, o trasmessa in qualsiasi forma o mezzo, 
elettronico, meccanico, fotocopia, registrazione o altri senza la preventiva autorizzazione 
scritta dell’editore. 


Il 



Nota di Programmazione 


Un certo numero di funzioni del Commodore 64, come di altre macchine Commodore, 
viene selezionato dal “carattere di controllo’’, contenuto nelle stringhe ordinarie, che 
diventa operativo quando la strigna viene stampata. I caratteri di controllo possono di 
solito essere riconosciuti dal fatto che essi sono caratteri inversi (il loro colore e quello 
dello sfondo sono scambiati). 

Le funzioni con cui si controllano tali caratteri comprendono la posizione del cursore, i 
colori di stampa, inverso (RVS) ON ed OFF, “cursore home” (HOME) e “pulisci lo 
schermo” (CLR). 
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INTRODUZIONE ALL’EDIZIONE ITALIANA 


Parecchie caratteristiche rendono i giochi d’Adventure molto diversi dagli altri giochi per 
Computer, monotematici e in gran parte destinati a saggiare l'abilità manuale ed i riflessi 
del giocatore, proponendo scenari in cui l’aspetto grafico e sonoro assume importanza 
rilevante. Queste ultimi, in fin dei conti, arrivano direttamente dalle sale giochi, o si 
ispirano alle macchine elettroniche dei bar. 

I giochi d’Adventure si caratterizzano innanzitutto per lo SCOPO, mettere alla prova le 
capacità mnemoniche e deduttive del giocatore (così come la pazienza, spesso!), 
proponendo un obiettivo da raggiungere; quindi per il MEZZO, la presentazione di un 
evolversi di situazioni in cui il giocatore è coinvolto; infine per l’ASPETTO, di solito 
straordinariamente sobrio, almeno se si confrontano con i giochi e le battaglie spaziali. 
In questo ultimo aspetto risentono ancora dell’originale ambito in cui sono nati, i grossi 
centri di calcolo, di Università o industrie, in cui si configuravano come eccitanti 
esperimenti destinati a mettere alla frusta le capacità deduttive del giocatore, e a 
dimostrare l’abilità inventiva dell’ideatore. 

II continuo miglioramento delle caratteristiche di velocità è memoria dei computer, ha 
permesso l’ingresso dei giochi d'Adventure nel mondo dei Micro, in cui il CBM 64 
occupa stabilmente una posizione di predominio. 

Il libro di Mike Grace appare quindi in un momento in cui si tende alla realizzazione di 
giochi più coinvolgenti e personalizzati, e per le sue caratteristiche di leggibilità e 
gradualità d'approccio al problema, costituisce uno strumento utilissimo per chi voglia 
avvicinarsi al mondo dell’ideazione e programmazione di Adventure. Anche i program¬ 
matori esperti troveranno stimoli e suggerimenti impagabili, specialmente per quanto 
riguarda la fase di progettazione del gioco e la pianificazione della trama. 

Il libro è diviso in due parti. Nella prima, attraverso un esempio introduttivo, il lettore è 
portato gradualmente alla fase di ideazione e progetto di un’Adventure, prendendo 
contatto con i concetti di percorsi, griglie, locazioni, oggetti, obiettivi, pericoli, azioni. 
Contemporaneamente allo svolgersi di questa operazione didattica, vengono presentati 
i moduli del programma separati, che concludono le varie sezioni tematiche, e di cui si 
commentano ampiamente le istruzioni. 

Alla fine risulta un programma semplice, ma non per questo meno istruttivo. 

La seconda parte del libro approfondisce gli aspetti della prima, introducendo anche 
esempi di interventi della grafica e del suono, e affinando alcune caratteristiche lasciate 
in ombra nella prima, per rendere più accattivante e appassionante il gioco. È qui che 
viene progettato e costruito il vero programma di gioco, che alla fine risulterà costituito 
da circa un migliaio di istruzioni. 

L’aspetto più interessante del libro è senz’altro costituito dalla modularità della trattazio¬ 
ne, che permette anche al neofita di programmazione di capire il significato delle varie 
fasi e operazioni, e consente altresì all’esperto di aggiungere, dove lo voglia, gli interventi 
che reputa più utili per migliorare il gioco, o introdurre nuovi aspetti. L'autore stesso ha 
previsto queste possibilità, e le incoraggia, anzi. 

Il programma di questa seconda parte occupa praticamente tutta la memoria del CBM 
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64, e quindi eventuali modifiche devono tener conto di ciò. Per facilitare questo tipo di 
interventi è stata aggiunta l'appendice D, con l’intero listato dei programmi delle due 
parti del libro, come risultano dalla fusione di tutti i singoli moduli. Questo permette 
anche di poter inserire in un unica sessione il programma, anche se questa procedura 
viene sconsigliata dall'autore, dato il carattere eminentemente didattico del libro. 

Ho ritenuto opportuno tradurre i messaggi del programma, spesso idiomatici nell’origina¬ 
le, così che sarebbero potuti apparire ermetici e sibillini a chi non avesse una profonda 
conoscenza dell’inglese Ho cercato comunque di conservarne l’aspetto scherzoso ed 
ironico. 


Flavio Brunelli 
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PREFAZIONE 


Questo libro tratta dei giochi d'Adventure e di come crearsene di propri. Sebbene sia 
principalmente un libro di “come si fa”, ho tentato pure di tener desta la passione di 
divertirsi con questo tipo di gioco, ed ho sparso qua e là molti suggerimenti e consigli 
che potrebbero aiutare gli appassionati d’Adventure (siano essi principianti od esperti) 
ad indulgere gioiosamente alla loro passione. 

Quando ho cominciato ero un programmatore abbastanza inesperto (suppongo di 
esserlo in parte ancora) ed il pensiero di scrivere un gioco che dovesse contenere 
profondità e mistero mi sembrava terribile. Sono lieto di affermare che, a dispetto 
dell’apparente complessità e lunghezza del programma finale, ciò è stato veramente 
facile - una volta svelati i meccanismi di base della costruzione della struttura per il 
mio programma. I miei ringraziamenti vanno a David Lawrence che mi ha orientato 
nella giusta direzione in occasioni in cui ogni cosa sembrava richiedere troppo sforzo. 
Così, anche se siete un principiante nella programmazione, questo libro è ben adatto 
alle vostre capacità. 

Mentre il libro vi permetterà ovviamente di inserire e quindi utilizzare il mio gioco - Il 
Pianeta dell'lncubo - vi fornirà anche (e di più verso la fine) un piano per creare la 
vostra personale Adventure proprio da zero. Non è per niente un libro del tipo copiami 
e gioca’ - e sospetto che per molti appassionati d’Adventure l’eccitazione di creare il 
loro proprio capolavoro (per sconcertare e divertire gli amici) sia la massima soddisfazio¬ 
ne del programma e giocare. 

Nel corso della scrittura ho imparato a conoscere il Commodore 64 - una macchina 
superba per i patiti di Adventure di tipo “Text”) aggiungeranno quel tocco di professionali¬ 
tà al vostro gioco che rende un programma di bell’aspetto. 

Il libro è diviso in due sezioni. La prima riguarda i meccanismi per la creazione di una 
struttura per la vostra Adventure - come costruire le locazioni e muoversi tra esse, 
come raggiungere gli oggetti e spostarli nella vostra struttura, e come creare rischi e 
pericoli da far incontrare ai vostri giocatori. Questa sezione contiene un programma 
prova chiamato GIOCO DI AVVENTURA il quale è puramente una struttura semplificata 
per illustrare i concetti (che possono essere usati ripetutamente). 

La seconda sezione tratta della creazione dei disegni, della stesura della trama, e della 
programmazione sul vostro 64 di un’Adventure - dalla concezione al completamento. 

Il programma IL PIANETA DELL’INCUBO (che sembrerà all’inizio spaventosamente 
lungo) è esposto attraverso i vari capitoli in forma modulare per aiutarvi quando inizierete 
a creare il vostro. Mentre è possibile sedersi e inserire l’intero lavoro in una sessione 
maratona (!!), se lavorerete capitolò per capitolo introducendolo in uno stadio per volta, 
ciò vi aiuterà più tardi nel progetto del vostro programma. 
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Mentre questo libro può essere letto sul treno o davanti al focolare, esso è in realtà un 
libro da usarsi vicino al 64 o con una matita e parecchi fogli di carta per lavorarci. 
Alcune pagine contengono liste o diagrammi che ho trovato inestimabili nella mia 
progettazione - e se potete usare una fotocopiatrice vi suggerirei di farvene delle copie 
come aiuto. Ad ogni buon conto divertitevi! 

Quando ho iniziato (come ho detto prima) ero proprio un vero giocatore entusiasta 
d’Adventure. Durante il tempo che ho consumato sono diventato un migliore programma¬ 
tore e senza dubbio anche un buon giocatore. Infatti il mio entusiasmo sembrava 
crescere ad ogni capitolo che scrivevo. 

I miei ringraziamenti vanno alla Commodore per avermi reso disponibile il 64, a David 
Lawrence per la sua guida ed il suo aiuto, ed ai miei famigliari per la loro pazienza e 
gli utilissimi suggerimenti durante la prova della mia Adventure. 
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PARTE I 




CAPITOLO 1 

IL MISTERO E LA MAGIA 


Il petto ansimante, il sudore gocciolante sul suo corpo color del bronzo, i muscoli 
doloranti come se fosse stato stirato per una settimana su una ruota di tortura, Caronte 
barcollava sull’orlo di un vasto precipizio che era apparso sotto i suoi piedi, come da 
un perverso disegno piuttosto che da uno scherzo della natura. I suoi occhi tremavano 
guardandosi dietro, nell'udire i cani. Lo avrebbero sicuramente raggiunto da un momento 
all'altro! 

Ma quale via riprendere? Dove fuggire? Dietro di lui la potente armata dell’Imperatore 
Draloor ed il tre volte maledetto Zamrian che caccia con i cani (capace, correva voce, 
di inseguire un uomo da solo attraverso il vasto oceano) si stavano avvicinando. A 
destra e sinistra le pareti delle montagne, a cento passi se non di più; ma per i 
nascondigli che offrivano avrebbero potuto benissimo essere anche a pochi passi! E 
davanti un precipizio spalancato - una spaccatura naturale nel fondo della valle troppo 
larga da saltare, anche per i suoi potenti muscoli. 

Intrappolato. Troppo tardi ora per pentirsi della sua avventatezza nel corteggiare Darleen 
(e come poteva sapere che la giovane era la figlia dell’imperatore se ella mai glielo 
disse?). Sollevò la sua formidabile spada nella mano destra, e si girò ad affrontare i 
suoi persecutori. 

Ai suoi piedi un piccolo anello d’oro brillo’ nella luce della sera, richiamando la sua 
attenzione. Si fermò per raccoglierlo ed ecco all'Improvviso che i cani erano su di lui... 
Il precedente brano potrebbe benissimo provenire da un libro di “heroic fantasy" (fiaba 
epica) - un altro termine per “sword and sorcery” (spada e stregoneria), un modello 
per la scrittura di “fantasy” reso popolare durante gli anni 30 sui giornali dell’epoca, o 
parte della sceneggiatura per un film. Potrebbe essere l’epilogo di un libro “comic”, o 
anche l’inizio di un gioco chiamato Draghi e Sotterranei. 

Oppure, ovviamente, potrebbe essere una scena da un gioco di Adventure. 

Vi sono delle possibilità che voi, leggendo questo libro, conosciate già, i giochi d’Adventu- 
re e abbiate giocato un po’ - ma ciò è difficile se il 64 è il vostro primo computer, poiché 
le possibilità di scelta di questo tipo di software sono alquanto scarse. 

Comunque avreste potuto sentire o leggere qualcosa a proposito - ma non vi sarete 
davvero adoperati per trovare il tempo di inserire i programmi riportandoli da una rivista 
(un’impresa da maratona a dir poco) o meglio ancora per riuscire a giocare una partita 
fino alla spesso amara conclusione. Tuttavia il concetto di giochi d’Adventure ha un 
fascino piuttosto universale e le Adventure stanno moltiplicandosi dappertutto. 

Sotterranei e draghi 

Se siete ai primi approcci al concetto di giocare un ruolo', dedicherò qualche istante a 
precisare alcuni concetti. I giochi d'Adventure sono così chiamati poiché coinvolgono 
VOI - il giocatore - in un’avventura con un esito od un altro. 

Invece di stare ad osservare come spettatore (come per un film od un libro) ora diventate 
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l'eroe o l'eroina, e in una certa misura controllate il vostro proprio destino durante il 
gioco In nessun istante potete essere sicuri di giungere ad un lieto fine, anzi piuttosto 
il contrario! 

L'idea era stata in origine generata per un altro tipo di gioco con un ruolo attivo sviluppato 
nel lontano 1970 chiamato Sotterranei e Draghi. Diversamente dalla maggior parte di 
giochi da tavolo o di carte, i giocatori usano la loro mente e l'immaginazione per 
muoversi attraverso un mondo fantastico creato da un Maestro dei Sotterranei (qualcuno 
che dirige il gioco, piuttosto che del genere Banchiere del Monopoli), e assume anche 
il ruolo di vari personaggi da introdurre via via per dare maggiore autenticità al gioco. 
Nella fase iniziale questa partecipazione con la mente e l'immaginazione è tutto quello 
che è richiesto, ma ulteriori versioni hanno tentato di assecondare un mercato potenziale 
più vasto, introducendo una scena, per dare ai giocatori un centro tangibile per la loro 
attenzione. 

Questo ha l'effetto (secondo me) di soffocare le potenzialità creative dei partecipanti, 
se non si può usare il microcomputer. 

Forse è questa una delle ragioni per cui le Adventure stanno guadagnando ora in 
popolarità. 

Un esempio di gioco può assumere il seguente aspetto: 

I giocatori scelgono vari ruoli: un elfo, un mago, un guerriero, una principessa, un 
buffone, ecc. (La maggior parte dei giochi originali si concentrano sul mondo fantastico 
dei racconti di fate e di folclore - risentendo di una forte inclinazione verso II Signore 
degli Anelli di Tolkien). 

II Maestro dei Sotterranei crea lo schema principale del gioco (di solito poco prima che 
arrivino i giocatori). Avrà anche tracciato una intricata mappa di stanze (sono i sotterra¬ 
nei) dentro cui i giocatori si muoveranno. Avrà inoltre creato parecchi tesori che essi 
dovranno raccogliere, e dei pericoli che farà scattare su di essi finché non saranno 
giunti in una particolare stanza della mappa, (vedi Figura 1.1). 

Il gioco inizia. Ciascun giocatore muove a turno - di solito verso est, ovest, nord, sud, 
su o giù. Non appena il giocatore arriva in una stanza il Maestro dei Sotterranei segnerà 
il tipo di stanza, gli oggetti che lì occorre trovare, e, se attivabile, il pericolo. 

Il giocatore deve quindi usare la presenza di spirito e l’immaginazione (così come l'abilità 
nel giocare) o nel combattere e sconfiggere il pericolo o nel fuggire, preferibilmente con 
l'oggetto. 

Il fascino del gioco dipende dalla combinazione di mistero e di magia del mondo 
fantastico, ed in più dalla smisurata ampiezza deH’immaginazione umana. 

Nessun pericolo di giocare la stessa partita due volte, data la grande varietà dei possibili 
schemi. Si dice che alcuni giochi continuino per settimane, non appena giocatori esperti 
si inoltrano nel profondo dedalo di gallerie, e le trappole de Maestro sono state intuite. 

Gli inizi delle Adventure 

Già negli ultimi scorsi anni l’idea di introdurre il gioco nei computer ha messo radici 
nelle menti dei programmatori di grossi computer. Esiste una leggenda sugli operatori 
intrappolati davanti al loro Mainframe - gli occhi arrossati e annebbiati dal sonno perduto 
vagando dentro lo smisurato complesso di passaggi e posizioni. 

Qualsiasi sia la verità, il gioco non solo è continuato sotto il dominio del micro- in piena 
fioritura - ma sta guadagnando in popolarità ad ogni anno che passa. 
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Figura 1.1 Una mappa dal gioco “Dungeon and Dragons” 


1. Ingresso in un pozzo del giardino. 

2. Stanza con mappa, spada e coltello. 

3. Curvatura dello spazio per accedere al livello 6. 

4. Cella con un ragno gigante che sorveglia il tesoro. 

5. Cella con sei folletti maligni. 

6. Cella vuota. 

7. Cella vuota - la porta si chiude di scatto dietro di voi. 

8. Stanza del Mago. Dovete essere 'magici' per fuggire (livello 4). 

9. Passaggio che conduce giù al livello 2. Scala scivolosa. 

10. Stanza con un cappello del Mago. Esplorabile solo con i poteri magici più elevati 
(livello 8). 

11. Sotterraneo. Nessuna possibilità di fuga. 

12. Passaggio che conduce a morte. 

13. Vasta sala del trono con status gigante dagli occhi formati da rubini. Asportando i 
rubini la statua prende vita. 
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La differenza principale tra l idea originale di Draghi e Sotterranei ed il Gioco d'Adventure 
è che quest ultimo diventa piu personale e (nella nostra società cosciente del valore 
del tempo) piu accettabile. È possibile salvare la maggior parte dei programmi su nastro, 
dimenticarseli e ritornare ad essi più tardi. 

Non avrete bisogno di radunare insieme delle persone per giocare. In qualche modo il 
computer è diventato un valido avversario da battere - con lacci o lacciuoli! 

Le prime variazioni si concentrarono sulle Adventure solo di testi, tanto da farle sembrare 
forse un noioso gingillo, per il fan degli Arcade (orientati alla grafica) colpito soprattutto 
dagli effetti ottici. Ed è tuttavia questa assoluta mancanza di immagini che dà fascino 
a questo genere. Attraverso le parole vi si può aiutare ad immaginarvi nella mente 
situazioni piu vivide di quanto possano mai fare dei grafici. Finché i programmatori non 
potranno produrre immagini altrettanto piacevoli dei cartoni di Walt Disney, (e ciò non 
è proprio così remoto), continuo a preferire le Adventure basate sui testi alle loro rivali 
grafiche. 

Ma non voglio togliervi le vostre opinioni sulle Adventure basate sui testi, poiché ne 
esistono alcune che prendono una forma completamente differente da queste ultime, 
finché non si confondono con una versione ibrida nella quale il personaggio viene 
manovrato col joystick su un certo numero di locazioni “grafiche". La mia principale 
obiezione è sull’uso della preziosa memoria (che può essere altrimenti utilizzata per 
creare un'adventure più lunga o un numero più elevato di rischi e oggetti lungo il 
percorso). I grafici tendono ancora ad essere un sostegno povero alla mia visualizzazio¬ 
ne del mondo fantastico, che la maggior parte delle Adventure permettono di immagina¬ 
re. Ma non ho ancora giocato Gli Hobbit!. 

A causa di questa mia preferenza mi sono concentrato, in questo libro, sul genere 
basato su testi. Ho detto che ci sono parecchie buone versioni grafiche divertenti da 
giocare - ma io le metterei proprio in una categoria differente. 

Non posso in verità finire questa brevissima introduzione senza ricordare Scott Adams, 
probabilmente il nome più noto nel mondo delle Adventure per Microcomputer, il quale 
ha in origine scritto questo gioco per il TRS-80, adattandolo poi a parecchie altre 
macchine famose (compreso il VIC 20 cui probabilmente seguirà il 64). Questi giochi 
hanno stabilito gli standard che parecchi altri hanno seguito - ed io ne ho sfrontatamente 
copiato lo stile nella mia Adventure. 

Cenni sul come giocare nelle adventure 

Sebbene la maggior parte degli appassionati d’Adventure imparino con l’esperienza i 
trucchi del mestiere lungo il duro cammino, ci sono pochissime vie standard per aiutare 
il principiante (e, mi si conceda, anche il giocatore esperto qualche volta) a migliorare 
il proprio gioco. Come per ogni hobby, occupazione o sport, un po’ di pratica ed un 
pizzico di esperienza tendono ad accrescere il divertimento piuttosto che guastarlo. 
Tuttavia, se volete condurre a buon fine da soli l’avventura e fare da voi le vostre 
scoperte, saltate del tutto questa sezione. 

Le mappe 

Spenderò un po’ di tempo sulle mappe nei Capitolo 2 e 9, ma voglio aggiungere qui 
che le mappe non sono indispensabili, ma vi aiutano per capire in maniera definitiva in 
quale parte dell’adventure siete. Le disegno sempre su un grande foglio di carta, e tento 
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di muovere da una locazione all’altra all’inizio, proprio per prefigurarmi dove sia sistemata 
ogni cosa. 

È cosa preziosa annotare la posizione degli oggetti, in quale stanza essi sono, ogni 
condizione speciale (come una luce che arriva dal fondo di una galleria non ancora 
esplorata) ed ogni altra traccia. Ogni volta che riterrete che una qualsiasi cosa sullo 
schermo ha una qualche rilevanza, aggiungetela alla mappa. Provate ad usare un foglio 
di carta 10 volte più grande di quante supponevate necessario. Troverete che è troppo 
piccolo! 

Un gioco con un labirinto veramente complicato, con corridoi, curve, livelli, su e giù ecc. 
può confodervi. Un modo per tentare di tracciare la vostra avanzata è di trasportare 
vari oggetti nel labirinto lasciandoli cadere in posizioni strategiche. Quando tornate nella 
stessa locazione l’oggetto dovrebbe essere lì, e potete quindi chiarire esattamente dove 
siete. 

Gli oggetti 

C’è una regola d'oro nelle Adventure - rilevare ogni cosa che potete. È una buona idea, 
dal momento che parecchi giochi tendono ad avere un oggetto in un posto per una 
precisa ragione (oscura tuttavia), e potete stare certi che ne avrete bisogno prima o 
poi. Il problema reale si presenta come un limite posto al vostro inventario, ed è quindi 
necessaria abilità nel scegliere gli oggetti più opportuni, che andranno sistemati nelle 
apposite locazioni. 

Un problema in più è rappresentato dalla subdola norma di aver bisogno di due o tre 
oggetti alla volta, per esempio un fucile o un coltello. Un’altra piccola informazione: in 
alcuni giochi potrete dover ripetere un’azione. Per esempio in “Terra dAdventuré’ (il 
primo dei giochi di Scott Adams) trovate una lampada; in seguito al comando SFREGA 
LA LAMPADA appare un genio che fornisce un utile insieme di informazioni. Se sfregate 
la lampada una seconda volta viene mostrata un’altra e più utile risposta. Ma guardatevi 
bene dal farlo una terza volta... 

Uno dei trucchi preferiti nei giochi è quello di creare una postazione in cui c’è troppo 
buio per vederci. Troverete di solito una lampada, una torcia, dei fiammiferi o alcuni 
altri oggetti con cui illuminare la scena - spesso in qualche altra parte dell’adventure. 
Ma prima ci potrebbe essere un intralcio, come un limite di tempo posto alla luce, una 
corrente che spegne il fiammifero, batterie che si esauriscono. La maggior parte dei 
giochi comprendono un inventario - ed un semplice consiglio consiste nel controllare il 
vostro inventario, quando iniziate il gioco, di modo che potete anche scoprire che avete 
già trovato alcuni oggetti. 

Guardandosi intorno 

Alcune Adventure vi permettono di usare il comando GUARDA, e ciò è spesso necessa¬ 
rio per scoprire oggetti o tracce. Provate sempre ad utilizzare il comando GUARDA, se 
il programma ve lo permette, non appena arrivate in una nuova locazione. Alcune volte 
il comando mostrerà esattamente la vostra posizione (come nel mio gioco “// pianeta 
detilncubo”). Con l’esperienza la risposta del computer vi dà spesso l’indizio che vi 
aspettavate. Svariati giochi contengono risposte singole, come una replica standard, 
per esempio “NON SO COME” seguita da un verbo che non è nel vocabolario del 
gioco. Potete usare questa particolarità a vostro vantaggio, durante il gioco. Per esempio 
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se arrivate in una stanza e inserite APRI LA PORTA ricevendo la risposta NON SO 
COME APRIRE, allora è ovvio che la parola chiave è qualcos’altro, forse SBLOCCA o 
proprio SUPERA LA PORTA. 

Tuttavia se la risposta è NON PUOI FARE CIO’ ANCORA allora potete essere pratica- 
mente sicuri che APRI è una parola riconosciuta, ma avete bisogno di qualcos’altro 
prima che vi sia concesso di aprire la porta, forse una chiave. 

Il progetto della stesura della vostra adventure 

Suppongo che potremo in realtà partire chiedendoci perché la gente vuole giocare 
un'ADVENTURE, prima di pensare di scriverne una. Ho già suggerito alcune delle 
ragioni - l'alone di magico delle nostre fiabe d'infanzia, quando le regine fate potevano 
esaudire tre desideri e ogni cosa si aggiustava, o i terribili giganti seminavano terrore 
nei nostri vividi incubi, mentre eravamo coricati al buio. 

C'è qualcosa di ancestrale nel mondo della fantasia e dell’orrore che esercita un fascino 
universale per la gente di ogni paese - soprattutto, chi non drizza le orecchie quando 
si sta raccontando una buona storia di fantasmi (specie se uno la crede vera)! 

Così i giochi di adventure (che hanno le radici nel mondo dell’oscuro e del misterioso) 
posseggono nella loro struttura questa attrazione e noi crediamo di essere parte di essi. 
E qui sta la seconda (e più importante suppongo) attrattiva - il fatto di essere investiti 
di un ruolo nella storia che si svolge. Il concetto di giocare un ruolo è ancora allo stadio 
infantile (parecchi libri, tratti di peso dal tema di Sotterranei e Draghi , sono disponibili 
già, comunque). Ma siamo ancora parecchio lontani dall’idea, propria della fantascienza, 
di inserire nella nostra mente un “registratore di sogni", in modo da poter immaginare 
un'adventure di nostra scelta, nella quale diventare l’eroe o il malvagio. Stiamo comun¬ 
que andando in questa direzione. 

Ancora non siamo completamente coinvolti, ma il microcomputer ci ha definitivamente 
aiutati ad incamminarci nella giusta direzione. Con una programmazione accurata il 
giocatore sembra avere una varietà di decisioni da prendere, le quali indirizzeranno lo 
svolgersi della storia - e nel momento in cui questa procede, la sensazione di partecipare 
ad una situazione aumenta. 

A tutti noi piace dirigere, se possibile, ed è questo che costituisce particolare attrattiva 
nello scrivere il vostro personale gioco - VOI potete dirigere la storia - VOI potete 
decidere l'ambiente - VOI create i personaggi - VOI potete proporre indovinelli ed 
enigmi per far arrabbiare il vostro sfortunato giocatore - VOI possedete il controllo. E 
senza alcun dubbio, la sensazione di aver successo nel produrre un’opera d'arte (devo 
infilare la testa nel proverbiale nodo, per aver definito opera d’arte un gioco al computer- 
ma è pur sempre un atto creativo che produce piacere, così sono giustificato!) è buona 
ricompensa per lo sforzo. 

Il progetto dell’Inizio del gioco 

Mi si conceda di terminare questo capitolo con una nota più pratica. Abbiamo deciso 
di iniziare a scrivere la vostra Adventure, ma da dove cominciare? 

Se volete iniziare progettando la vostra storia in modo diretto vi suggerisco di passare 
al Capitolo 5, poiché la prossima sezione del libro tratta concetti di programmazione. 
Ma prima di farlo non è cattiva idea avere in mente un piano chiaro. 
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INIZIALIZZA LE 
VARIABILI 
DIMENSIONA LE 
MATRICI 


INPUT 

NON VALIDO 


I 



INPUT 

VALIDO 


i 


Flowchart 1.1 Un'Adventure di base 








Diagramma 1.1. È un diagramma immaginario che descrive le basi per la creazione di 
un'Adventure. 

Il blocco 1 comincia inizializzando alcune variabili (come la posizione del giocatore) e 
dimensionando le matrici. (Se siete un po' disorientati dal concetto di matrice non è il 
caso di preoccuparsi a questo stadio. Qualsiasi spiegazione vi dessi ora, per esempio 
immaginarsele come le pagine di un libro o un orario ferroviario, vi confonderebbe 
solamente - e, ad esser sinceri non è necessario capire ciò per scrivere un'Adventure!). 
Il blocco 2 non è altro che un metodo per visualizzare sullo schermo le informazioni 
necessarie. Di solito consistono in una breve descrizione di dove vi trovate e di ogni 
oggetto o pericolo che vi può essere nei dintorni. Anche questo stadio del programma 
controllerà se siete in alcune locazioni, a cui si applicano condizioni speciali (p.e. potete 
trovare, entrando in una particolare stanza, che la porta è stata richiusa a chiave dietro 
di voi, e non potete più fuggire per quella via). 

Il blocco 3 chiede un input al giocatore (di solito facendo apparire il messaggio COSA 
VORRESTI FARE ORA?) e attende quindi la risposta. 

Il blocco 4 attua un semplice controllo di validità dell’input. Se non è valido, il programma 
risponderà in maniera standard (tipo NON SO COME FARE CIO’!) e quindi ripete la 
richiesta di input nel blocco 3. 

Il blocco 5 è il vero nocciolo del programma. Qui tutte le differenti risposte (come AIUTO 
o VAI A NORD) sono interpretate e quindi attuate. Il programma quindi ritorna al blocco 
3 e attende il successivo input. 

Naturalmente ci vuole un po’ di più di questo per scrivere un gioco completo — ma 
l’essenziale c’è. Ora affronteremo il vero problema di una seria programmazione. 
Sebbene io abbia accennato al capitolo 5 per dare alcune idee sul come creare la 
vostra storia — se non siete un esperto programmatore il poco tempo in più che dovrete 
usare per leggere i Capitoli 2-4 sarà prezioso, poiché contengono una chiara spiegazione 
dei meccanismi di base della strutturazione del vostro programma. Sospetto che le 
Adventure abbiano bisogno di una pre-pianificazione più di ogni altra cosa. 
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CAPITOLO 2 

MUOVERSI IN UN’ADVENTURE 


Dobbiamo capire i meccanismi di base di un gioco di Adventure prima di partire a creare 
il nostro capolavoro contenente un bel numero di locazioni, pieno di pericoli, oggetti 
sparpagliati attorno in abbondanza—e tutte le altre ghiottonerie che creano il divertimen¬ 
to (e la frustazione) nella programmazione e nel gioco. Prima di partire ed accendere 
il 64, è importante avere un’idea di cosa si tratterà nel gioco. Ciò va bene sia per il 
semplice gioco che ho creato per illustrare varie procedure, sia per il chilometrico gioco 
della seconda parte del libro. 

Probabilmente la prima più importante caratteristica di un gioco interessante è che voi 
abbiate una grande varietà di locazioni — e che vi possiate muovere in esse in maniera 
varia. Per fare ciò avete bisogno di una mappa. 

Mappe - come tracciarle ed interpretarle 

Mentre è possibile giocare tutta un'Adventure senza una mappa, quasi tutti i giochi 
saranno più gratificanti e facili se potete tracciare la vostra avanzata mentre marciate. 
Infatti una dei modi più facili per iniziare ogni gioco è di muovere da una locazione 
all'altra annotando dove siete e quali uscite conducano i nuovi posti. Per LOCAZIONE 
in una Adventure si può intendere qualsiasi posto, per esempio una stanza, la cima di 
un albero, dentro un ascensore, fuori da una finestra, ecc. 

In una delle Avventure di Scott Adams, The Count (Il Conteggio), voi vi alzate dal letto: 
nella vostra stanza c'è una finestra. Se inserite VAI ALLA FINESTRA (ed essa è già 
aperta), allora vi spostate in un’altra LOCAZIONE, sul davanzale della finestra. Se poi 
andate GIÙ (usando un metodo che non rivelo), vi muovete in un’altra LOCAZIONE, il 
cornicione della finestra, che a sua volta conduce in un'altra stanza nel castello. In ogni 
caso il cornicione della finestra ed il davanzale della finestra contano come LOCAZIONI 
separate. 

Senza dubbio ci sono tante maniere di tracciare una mappa quante persone capaci di 
farlo — ma il metodo che ho trovato più facile sembra estremamente semplice sicché 
lo userò per illustrare le mappe attraverso il libro. Ogni volta che sto per cominciare 
una nuova Adventure schizzo la mia prima LOCAZIONE nel centro della pagina come 
una scatola contenente la parola adatta. Uso sempre il centro della pagina a questo 
stadio poiché non so ancora se sto per cominciare un viaggio verso est, nord, sud od 
ovest. 

Dopo aver disegnato la scatola segno le uscite che mi sono concesse (la maggior parte 
delle Adventure aiutano dicendovi quali uscite sono disponibili - ma altre invece 
attendono che voi battiate, per esempio: 

VAI A NORD 

prima di rispondervi 
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NON PUOI ANDARE PER QUELLA VIA 


e quindi aspetta ancora che indichiate un'altra direzione). 

Personalmente trovo questo ultimo approccio una perdita di tempo, cosi come non 
produce buoni risultati continuare a tentare direzioni differenti finché non trovate quella 
giusta. Quindi io segno delle frecce (una sola direzione in questa fase) che dalla mia 
LOCAZIONE vanno nella direzione appropriata. 


I 


CASA 


Figura 2.1 Tracciamento della mappa 1 

La Figura 2.1 mostra l’inizio di un’Adventure in cui mi sono trovato in una casa e mi è 
stato detto che potevo muovere a NORD o a EST. 

La prossima fase è di andare in una direzione possibile verso NORD o EST e di 
annotare la nuova LOCAZIONE. Nell’esempio immaginario avendo inserito NORD o 
solo N (come in molte Avventure, vi si permette di usare solo la prima lettera di ciascuna 
direzione), vi venite a trovare su un sentiero ed ora le possibili uscite sono OVEST o 
SUD (vedi Figura 2.2). 


A questo stadio posso aggiungere una freccia che torna dal sentiero alla casa (in 
parecchie Avventure se potete andare in una direzione arrivando in una nuova locazione, 
potete di solito tornare indietro - ma non sempre), ed una nuova freccia verso OVEST. 
Questo processo continua finché avrò mappato la maggior parte delle LOCAZIONI 
logiche, e potrò quindi cominciare a muovermi tra di esse. 

Non tutte le Avventure hanno LOCAZIONI ovvie, e nella maggior parte di esse le 
direzioni SU e GIÙ sono aggiunte alle direzioni solite, rendendo la mappa iniziale 
piuttosto difficile da disegnare, potendo benissimo avere parecchi livelli. Un esempio di 
ciò può essere una delle più note Avventure in assoluto - Terra di Adventure di Scott 
Adams - nella quale la mappa iniziale contiene solo una manciata di LOCAZIONI. È 
solamente dopo la scoperta di un certo “albero” che, una volta scalato, rivela una via 
GIÙ nel dedalo di passaggi e caverne, che la mappa può essere tracciata in tutta la 
sua estensione. 

Come ho già riferito prima, un intoppo di partenza è che non sapete dove siano le 
possibili LOCAZIONI - sicché è possibile che vi troviate fuori dalla pagina (vedi Figura 
2.3). Una piccola ristesura della mappa è tutto quello che è necessario. 
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Figura 2.2 Tracciamento della mappa 2 



I 


PIANURA 


FOR 





Figura 2.3 Tracciamento della mappa 3 
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La conversione della mappa in griglia 

L'essenza di tutti giochi di Adventure è l'abilità nello spostarsi di posto in posto, e ci 
sono parecchi modi per far compiere ciò al computer. La più semplice probabilmente è 
quella di convertire la vostra mappa in una griglia e quindi dare al computer le 
informazioni per permettergli di accettare certe aree della griglia (le attuali locazioni) 
come posizioni in cui è permesso muoversi. Se queste aree hanno un numero di 
riferimento allora è molto facile convincere il computer a "muovere” dentro questa area 
e visualizzare la locazione. 

È più facile capire ciò probabilmente, con un diagramma, (vedi Figura 2.4): Nella Figura 
2.4 (a) la nostra mappa è pronta per la conversione. Ci sono sei locazioni (numerate 
da 1 a 6 per convenienza, in questa fase), che iniziano con un campo, e quindi 



Figura 2.4a Conversione della mappa in una griglia 
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6 

mu 

8 

9 

10 






11 

12 

Ql 

14 

15 






16 

17 


19 

20 






21 

22 

23 

24 

25 


Figura 2.4b 


proseguono lungo un sentiero fino ad una casa. Ad est della casa c’è una foresta, 
quindi ci spostiamo verso sud in una pianura ed infine ad un lago. 

La Figura 2.4 (b) ha riportato questa mappa in una griglia di 5 x 5 (potrei aver usato 
una 4x4, per lo scopo di questo esempio, ma volendo concedervi delle stanze per i 
vostri esperimenti, ho deciso di usare la 5 x 5). La conversione è proprio il piazzare i 
quadrati - lasciandone 19 bianchi per il movimento). Uno dei vantaggi di questo metodo 
è che diventa facile espandersi o cambiare la vostra mappa mentre proseguite il 
cammino. 


il movimento all’interno della griglia 

Potete aver notato nella Figura 2.4 (b) che le varie locazioni ora hanno un diverso 
numero di riferimento. Per esempio la casa (numero 3 nella Figura 2.4 (a) è ora il 
numero 7). Questo ci consente di fornire al computer una formula semplice per 
convincerlo' di permetterci di 'muovere’. 

Se siamo nella locazione 7 e volessimo spostarci verso sud, allora dovremmo spostarci 
nella locazione 13. In maniera simile se siamo nella Locazione 13 l’ordine sud ci porta 
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nella Locazione 18. La formula x=x+5 ci porta verso sud - se x=8 allora il sud sarà 
8+5 che dà 13. Usando la stessa idea l'andare a nord sarà corrispondente ad una 
sottrazione - x=x-5 vi sposterà indietro da 18 a 13. L’est sarà ottenuto con x=x+1 
mentre l'ovest col contrario, x=x-1. 

In una gnglia 4 x 4 la formula sarà x=x+4 per il sud e x=x-4 per il nord. Ovviamente 
l'est e l’ovest sono indifferenti alla dimensione della griglia. 

L'ultima considerazione sul movimento è come evitare che il computer muova in una 
locazione inesistente - per esempio l'est o l’ovest della pianura (LOCAZIONE 13). La 
soluzione sta nell’ingannare il computer dicendogli che questa locazione non esiste - 
assegnando a quel quadrato il valore 0. 

Ciò diventerà più chiaro dopo che avremo fatto partire l’attuale programma - ma, per 
adesso, la Figura 2.5 dovrebbe bastare a dimostrare come noi sappiamo esattamente 
cosa dire al computer, per realizzare il processo del movimento da una locazione 
all'altra. 


1. 

CAMPO 

2 . 

SENTIERO 

0 

0 

0 

0 

7 . 

CASA 

8 . 

FORESTA 

0 

0 

0 

0 

13 . 

PIANURA 

0 

0 

0 

0 

18 . 

LAGO 

0 

0 

0 

0 

0 

0 

0 


Figura 2.5 La griglia di base per un gioco di Adventure 
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L’inizio della programmazione della vostra adventure 

Ora possiamo finalmente iniziare la programmazione. Prima di descrivere il primo 
modulo preferirei fornirvi alcuni consigli sulla programmazione in generale, che giudico 
prezioso menzionare in questa fase. I programmatori esperti possono tralasciarli, non 
essendovi niente di rivoluzionario qui, ma so dalla mia esperienza che alcuni dei trucchi 
più semplici del mestiere si dimentica spesso di menzionarli, poiché si presume che 
siano così semplici che tutti devono conoscerli. 

1. Salvate spesso i programmi 

È un trucco vecchissimo, che ho esitato a menzionare qui, ma che ho poi riportato 
pensando che quando si è presi dal vivo della programmazione è facile dimenticarselo. 
Una volta, durante la stesura de “Il Pianeta dell’lncubó" (il gioco di Adventure della 
seconda parte del libro) un temporale provocò il blocco del 64, ed il lavoro di circa 
un'ora andò perduto. Un’altra volta il disk driver rovinò aH’improwiso il mio programma 
ed anche il mio backup (proprio un bello scherzo questo!), avendo fatto il salvataggio 
senza il successivo controllo. Ora invece prendo il backup della versione precedente 
come misura per evitare che ciò possa succedere. 

Se il pensiero di tutti questi SAVE e VERIFY vi infastidisce, tenente in considerazione 
il suggerimento 2. 

2. Un elegante rìsparmia-tempo 

Se avete un’unità a disco continui SAVE e VERIFY del vostro programma diventano 
noiosi se non conoscete questo piccolo trucco. Prima di conoscere questo programma 
non ero consapevole che si potessero sovrapporre i programmi su disco, così come 
accade automaticamente su nastro, e quindi salvavo la mia nuova versione sotto un 
diverso nome, e quindi ricambiavo il nome dopo aver cancellato la versione precedente. 
All’inizio di ogni programma digitate questo piccolo modulo: 

1. GOTO 3 

2. SAVE “@0:NOME ’,8:VERIFY“NOME’’,8:STOP 

3. REM 

Se inserite il nome del vostro programma tra gli apici, ogni qualvolta volete fare il SAVE 
della versione, dovrete solo inserire GOTO 2 ed il 64 fa il resto. Di tutti i suggerimenti 
rimanenti che vi ho dato questo è uno dei migliori, ed io sono per questo grato a David 
Lawrence. 

3. Testate i vostri moduli. 

Quando cominciai la prima volta a copiare programmi da libri e riviste, mi sedevo di 
fronte al mio computer e mi impegnavo al massimo - tentando di inserire nella macchina 
tante più istruzioni BASIC che potevo, come se mi fossi prefisso un immaginario fine 
da raggiungere, senza poter perdere un secondo. 

Naturalmente commettevo degli errori ed il rintracciarli diventava una perdita di tempo 
senza eguali! Comunque, se testate ciascuna sezione del programma più spesso che 
potete, (avendolo salvato su nastro o su disco) per vedere se funziona, potete spulciare 
vari errori lungo il cammino, la qual cosa è molto meno frustrante e risparmia tempo. 
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4. Usate lo schermo per editare e copiare. 

Quando cominciate a programmare da libri e riviste, è spesso più facile copiare linea 
per linea, e l'idea di usare lo schermo per risparmiar tempo può spesso sfuggirvi di 
mente. 

Per capire come usare al meglio quest'idea, osservate l’inizio del modulo 1.1, e vedrete 
che ho usato un sacco di dichiarazioni REM e per spaziare il programma e dargli 
un aspetto gradevole. 

Se digitate la linea 100 prima e la 101 poi, allora è facile cambiare la 101 in 99 e 
schiacciare RETURN (ricordate di aggiungere o togliere un se il numero di linea 
cambia da2a3oda3a4 cifre). 

La nuova linea è posta nella memoria senza dover digitare ancora tutte quelle istruzioni 
con asterischi o 

Il sistema può adattarsi benissimo per le linee da 800 a 830 nel modulo 1.3. 

Il mio programma esempio contiene solo poche variabili, elencate sotto. 


P: Posizione della locazione attuale. 

P2: Posizione della nuova locazione. 

OB%: Valore intero dell’Oggetto nella Matrice Oggetti. 

OB$: Descrizione di una sola parola dell’Oggetto. 

Sl$: Descrizione estesa dell'Oggetto della Locazione. 

1$: Comando aspettato dal Giocatore. 

VE$: Verbo atteso in un comando di due parole inserito dal Giocatore. 

NO$: Nome atteso nello stesso comando. 

SP: Variabile locale usata per dividere 1$. 

I: Variabile locale per contare gli Oggetti nella Matrice Oggetti. 

N: Direzione NORD. 

E: Direzione EST. 

S: Direzione SUD. 

W: Direzione OVEST (West). 

SW% : Contiene 2 quando la palude è stata superata. 

MW% : Contiene 2 quando il mostro è stato ucciso. 

IV: Contatore dell’Inventario. 

Descrizioni delia locazione 

Dopo aver tracciato le locazione sulla nostra mappa, abbiamo bisogno di un messaggio 
da far apparire sullo schermo quando ci spostiamo in quella posizione, in modo che il 
giocatore sappia dove è. 
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Ho usato anche per questo semplice esempio la più concisa spiegazione possibile, 
proprio per permettere di vedere come funziona il gioco. 

Nella seconda sezione del libro questa parte del Programma è forse la più grande 
divoratrice di byte di tutte, poiché i vari passaggi descrittivi usati per dare atmosfera 
all’intera storia, occupano veramente una larga fetta della memoria. Tuttavia, dal 
momento che il fascino del nostro gioco sarà affidato alla nostra abilità nel rendere 
coinvolto il giocatore - in ciascuna locazione - è ovvio che ciò consumerà quasi tutta 
la memoria, e secondo me un buon gioco di Adventure ne occuperà gran parte proprio 
per fornire quella atmosfera, a costo di tralasciare particolari come oggetti aggiuntivi o 
grafici. 


MODULO 1.1 

1 9oto3 

2 :~.ave " fàQ ; modu 1 o 1. 1. " .. 8 : ver i +’y " modu. 1 o 1 > 
Ks •• Stop 

3 rem 

99 rem********************************** 
********** 

100 rem 9loco d -avventura 

1 01 re r r,********************************* 

********** 

5991 : 

5992 : 

5993 rem******************************** 
********** 

5994 rem descrizione delle varie Posiz 
ioni 

5995 rem******************************** 
********** 


5996 





s H 7 

rem** 

*********** 

***** 


5998 

rem 

l u.o9o 1 



5999 

rem***************** 


6000 

Pr int 

"asiete in 

un c 

amPo, " 

6010 

n=0 ; e 

=0 : £=0 : 0 , 1=0 : 

9otO 

500 

801 ? 

rem** 

*********** 

***** 


6018 

rem 

1 i.i.090 2 



6019 

rem***************** 


6020 

Print 

"asiete su 

un s 

entiero." 

6030 

n—0 : e 

=0 : s=7 : w=l : 

: 9o to 

500 

6037 

rem** 

*****$***** 

***** 


6038 

rem 

luo9o 7 
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603? rem***#***#*#*##*### 

6040 Print "Slsiete in una casa." 
6050 n=2 ■ e = y ■ s—0 w—0 ■ got o 500 
605? rern***********+*m*M 

6058 reni luo9o 8 

6059 reru**m^**^*^m 

6060 Print "Slsiete in una foresta." 
6070 n=0 : e=0 ; s=13 ; w=7 ; 9oto 500 

6077 r-errt***************** 

6078 rem luo9o 13 

6079 rerù*im*sm********* 

6080 Print "Slsiete- in una Pianura." 
6090 n=8 : e=0 : s=18 : w=0 : 9oto 500 

6097 rem*****i**im*i***** 

6098 rem luo9o 18 

6099 ren*mmMW**M**m 

6100 Print "Slsiete Presso un la9o." 
6110 n= 13 : 8=0 : s=0 : i.ij=0 : 9oto 500 


Linee 99-101: Forniscono il titolo al programma. Ridate un’occhiata al numero 4 della 
sezione di suggerimenti prima di inserirle, così come tutte le altre linee REM, per 
risparmiare tempo e fatica. 

Linee 5991-5992: I due punti agiscono come un’istruzione REM; è semplicemente un 
modo per separare aree nella stampa, per eleganza. 

Linee 6000-6010: La prima linea stampa la descrizione della locazione. 

La linea 6010 è la chiave per correggere il movimento, in modo da chiarire ciò che sta 
succedendo. 

Se ritornate ad osservare la Figura 2.5 vedrete che la Locazione 1 è un campo. L'unica 
uscita possìbile è verso EST, alla Locazione 2 (il sentiero). 

Così la linea 6010 stabilisce che N = 0 (non potete andare a NORD), E = 2 (potete 
andare ad EST, verso la Locazione 2) e sia S che W = 0 (non potete andare a NORD 
od OVEST). Infine questa linea vi dice GO TO 500, istruzione nella quale vi verranno 
mostrate le possibili uscite da questa locazione (vedi modulo 1.3). 

Linee 6020-6110: Il resto del Programma completa le diverse dichiarazioni di PRINT 
per le differenti locazioni, e le appropriate istruzione per permettere il movimento verso 
Locazioni poste a NORD, EST, SUD, ed OVEST. 


20 



MODULO 1.2 


1 9oto3 

2 ss. ve " @0 ; rii oda lo 1.2".. 8 : ver i f y " modu. lo 1. 

2" .■ 8 : stop 

8 rem 
207 ^ 

298 : 

209 rem 

*Mm**M*MM***m** 

210 rem sett-3. 1 ■?. p os i z i one 

?! i rem *f**************^*m^*#*m*# 

220 P=7 
230 9oto 250 

235 ^ 

236 

237 rem. 

***3m*m*********** 

238 rem setta la Posizione 

239 rem ##############*################# 
+WW**************** 

240 P=P 2 

250 it P<.11 thè-n oti P voto 6000,6020,0, 0 
, 0,0., 6040, 6060 .■ 0, 0 

260 if P<21 the-n on P-10 9oto 0,0,6080,0 

. 0 , Cì , 0,6 1 00,0, 0 

27ij if p<26 then on P-20 9oto 0,0,0,0,0 

Linee 220-230: Qui si fissa la posizione a cui arrivate dopo aver dato il RUN al 
programma. P qui è la variabile POSIZIONE, se assegnate ad essa il valore 7 allora il 
primo messaggio che appare sullo schermo sarà riferito alla Locazione 7 - la casa. 
Naturalmente potremmo decidere di iniziare l'Adventure in un qualsiasi posto - non 
necessariamente la casa. 

Linea 240: Questa linea è in verità un po’ difficile da spiegare in questa fase, sicché 
inseritela e dimenticatela del tutto per ora. Vi serve solo sapere che essa introduce 
un’altra variabile - P2 - e che la pone immediatamente uguale a P. 

Linee 250-270: Sono le linee che istruiscono il 64 su come mostrare il messaggio 
appropriato sullo schermo. Usando l’istruzione ON .. GOTO come metodo per seleziona¬ 
re il corretto numero di linea, il programma prende il valore di P (che abbiamo fissato 
in 7 alla linea 220), e va alla linea 250. 
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Se P è minore di 11 (come è) allora viene scandita la lista degli indirizzi fino alla settima 
posizione (corrispondente a 6040). 

Scorrete quindi il programma finché non arrivate alla linea 6040; troverete l'istruzione 
PRINT "SIETE IN UNA CASA 

Quindi, per P = 7, sullo schermo appare il corretto messaggio. 

Se P fosse un numero maggiore di 11 (diciamo 13) allora il programma va alla linea 
260, e se P è minore di 21, in conseguenza dell'istruzione ON P-10 (cioè 13-10, ovvero 
3) GOTO, giunge all'indirizzo corrispondente al terzo numero della lista (che nel caso 
è 6080). 

Se inserite i Moduli 1.1 e 1.2 e quindi date il RUN, potete ricevere il messaggio “SIETE 
IN UNA CASA", seguito dal messaggio di errore “UNDEF’D STATEMENT ERROR IN 
6050". 

Questo perché avete detto al Computer di andare (GOTO) alla linea 500 che ancora 
non esiste. 

Fate di nuovo il LIST del programma e cambiate la linea 220 ponendo P = 18, e ridate 
il RUN. Questa volta riceverete il messaggio “SIETE PRESSO UN LAGO” e di nuovo 
il messaggio di errore. Prima di inserire il prossimo Modulo rimettete P a 7. 

Ora che abbiamo creato le Locazioni e informato il Computer su come trattarle, abbiamo 
bisogno di aggiungere l'elemento movimento, e di permettere al giocatore di usare 
l'INPUT per dire al 64 in quale direzione muovere. 


MODULO 1.3 


1 9oto3 

2 sa ve " @0 : modu lo 1.3 ".. 8 : ver i f y " modi ilo 1 . 
3".8 : stop 

3 reni 

487 : 

488 : 

483 rem*****##****##***^sm:*****#*#***** 

* : f^**:** : * : *-:***+***4;**#* 

490 reni mostra le opzioni di direzione 

491 rem+****+******:+**+:*****t:*+;**+****++ 

500 p r i nt " p u n i arida re a 11 ; 

510 if n>0 t Pi e ti Pri.mt" nord"; 

520 if e>0 then Print" est"; 

530 if s>0 then Print" sud"; 

548 if n>0 then Print" ovest": 

545 : 

546 : 

547 rer.i****4;***#^**^*5*e*3f:*^:s*E*i4É»+=+634s*^:5f-:**** 

mtMmwm********** 

548 rem subroutine di istruzioni 
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549 rer,-,***********:********************** 

550 Print chrf 1 ' 13> 

560 i nP ut " i stru.z i ori i : " ; ì ì 

r o i** 

799 r-*m*++*++**W**+**+*******+*MW**** 

mmMM*.**M**mw** 

790 reni subrettine- del movi merito 

791 reni*+:*******^.*:+***********if'*sf*+:*+*^ 

********************* 


800 

40 

if 


•3. Tid 

Ti 70 

thè fi 

P2=P-5 : 9oto 

810 

40 

if 

i*="e" 

3.Tid 

e>0 

thè fi 

P £— P+1 : 9oto 

8£0 

40 

if 

i $="£•" 

and 

:=>@ 

thè ti 

p2=p+5 ^ 9oto 

330 

40 

007 
O I 

if 

i$="o" 

and 

ljJ>0 

thè Ti 

p£=p-l : 9oto 


839 

********************* 

840 rem se non ci sono Posizioni Possib 
ili ne 11a d i rez i one 

341 

********************* 

350 Print : Print"sPiacente - non Puoi se-9 
aire Questa via. ! ! 11: 9oto £50 


Linee 500-540: Mostrano le possibili uscite. Così se N è maggiore di zero, il 64 stamperà 
NORD, e così via. Si noti sia l’uso dei punti e virgola alla fine delle linee 510-540 - 
questo impedisce che le direzioni siano stampate su linee separate - sia lo spazio tra 
virgolette all’inizio di ogni dichiarazione, il che permette di separare con uno spazio 
ciascuna parola. 

Linee 550-560: La linea 560 è un vero INPUT. Se comunque volete inserire prima la 
linea 550 che stampa il Ritorno Carrello, allora la parola “ISTRUZIONI:” apparirà alla 
fine della stessa riga contenente le uscite (a causa dei punti e virgola nelle linee 510- 
54 O). Se volete vedere cosa succede inserite la linea 560 e tralasciate la 550 la prima 
volta che provate. 

Linee 800-830: Qui sta il vero nocciolo dell’intero programma - il movimento reale. 
Usando la formula che ho descritto prima, queste linee controllano I e quindi se il 
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movimento è permesso (in altre parole se digitate “N” ed N = O in quella locazione, 
allora il Computer rifiuterà questa linea di INPUT). 

Se il movimento è permesso, segue il rapido cambio di valore di P in P2, la nuova 
locazione. 

Andiamo fino in tondo. Se P = 7 (Locazione 7 - la casa) e digitiamo N per NORD, 
allora nella linea 800 il 64 controlla se N = O. Se osservate il Modulo 1.1 vedrete che 
la variabile N è stata posta a 2, nella linea 6050 - sicché il movimento è legale. Ora la 
formula assegna alla variabile P2 il valore di P - 5 (7 - 5) ovvero 2. Infine la linea 
contiene un'istruzione GOTO alla linea 240. 

Ora possiamo capire perché la linea 240 è posta qui; perché prima che possiamo 
muovere dobbiamo cambiare P2 riponendola in P, in modo che le linee che seguono 
possano “comprendere" dove ci si sposta. Abbiamo ora la variabile P = 2 - e 
osservando la linea 250 possiamo vedere che ora c’è un GOTO alla 6020 - dove c’è 
il messaggio per la Locazione 2 - il sentiero. 

Linea 850: L'ultima del Modulo. Supponiamo di essere nella Locazione 7 (la casa) e 
chiediamo al Computer di andare a OVEST. Questo è un movimento non concesso, 
essendoci alla linea 830 W = O. Il Computer passa alla linea seguente, la quale produce 
una risposta standard “NON PUOI ANDARE PER QUELLA VIA" seguita dal ritorno 
all’input “ISTRUZIONI" che ripete la richiesta. 

Se avete inserito tutto il programma in modo corretto potete verificare che vi è concesso 
spostarvi dappertutto in completa libertà. Non è propriamente una procedura emozio¬ 
nante — ma illustra il principio del Movimento da un posto all’altro del vostro gioco di 
Adventure. 

Il Flow-Chart per questa parte del programma è mostrato nel Flow-Chart 2.1. 

Altri metodi di movimento che possono essere usati, comprendono dichiarazioni DATA 
e matrici. Sebbene risparmino memoria, io preferisco usare il metodo che ho illustrato, 
a causa della facilità di modifica, in un programma complesso. Infatti mentre stavo 
scrivendo “Il PIANETA DELL'INCUBO", l’Adventure della seconda parte del libro, ho 
modificato parecchie Locazioni ed anche la direzione tra esse, per accrescere la trama. 
Un secondo vantaggio di questo metodo è la sua abilità nel prevenire facilmente i 
movimenti illegali - qualche volta mi dilungherò in dettagli più avanti. Per il momento 
considerate ancora la Figura 2.5 e immaginate di poter muovere dalla Locazione 2 alla 
Locazione 1 solamente attraverso una direzione - da EST a OVEST. È una questione 
semplice modificare le linee 6010 e 6030 nella maniera seguente: 


6010 N=0:E=0:S=0:W=0:G0T0 500. 

(SI noti che era E = 2 nel programma originale) 

6030 N=0:E=0:S=7:W=1 :GOTO 500. 

Sebbene questa azione possa intrappolare il giocatore nella Locazione 1 (ogni direzione 
è ora posta a zero) la questione è che in una situazione in cui ci sia un'altra uscita 
sarebbe possibile passare dal sentiero al campo - ma non tornare di nuovo indietro. 
Questa flessibilità diventa possibile anche usando la dichiarazione DATA - ma è ben 
più difficile da realizzare. 
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♦ 



Flowchart 2.1 


Movimento nelle locazioni 









La fase successiva della nostra Adventure è cominciare a sistemare alcuni oggetti nelle 
varie locazioni - e quindi essere capaci di spostarli intorno. Una annotazione finale: 
non dimenticate di fare il SAVE su nastro o su disco del programma fino a quando non 
avrete costruito la struttura, nei seguenti due capitoli. 
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CAPITOLO 3 

OGGETTI E COMANDI 


Nell’ultimo capitolo abbiamo creato 5 Locazioni per la nostra Adventure ed abbiamo 
scoperto come spostarci tra di esse. Dovreste aver notato che dopo aver inserito e 
usato il programma vi siete un po' stufati. Rendiamolo perciò un poco animato ponendo 
alcuni oggetti nelle locazioni, ed impariamo come raccoglierli, spostarli attorno, e lasciarli 
ancora. Descriverò anche come raccogliere un Inventario (una registrazione degli oggetti 
che state portando) ed inizierò ad analizzare i vari comandi che un giocatore può 
inserire. 

Oggetti e matrici 

Come ho detto prima, le matrici possono causare disorientamento, e la comprensione 
di ciò che trattano non è essenziale alla programmazione del nostro gioco di Adventure - 
è però di aiuto. 

Il modo in cui visualizzo le matrici è pensare ad una variabile (diciamo x) che sappiamo 
cambierà il proprio valore nel corso del programma. Noi vogliamo tuttavia assegnare a 
X valori in sequenza piuttosto che in maniera casuale, e vogliamo anche sapere in ogni 
momento cosa rappresenta ciascun valore. 

Per far ciò possiamo scrivere X come X(1), ove 1 è il primo valore di X, X(2) ove 2 è il 
secondo valore, e così via. La cifra tra parentesi è detta indice di X. 

La Figura 3.1 rende chiaro tutto ciò. Possiamo pensare alla matrice come se fosse 
costituita da un numero di scatole tutte etichettate con X, dove X(1) è la prima scatola, 
X(2) la seconda e così via. (Un punto su cui riflettere qui è che il 64 chiamerà la prima 
scatola con 0, se non gli si ordina diversamente - p.e. la scatola 1 è X(0), la scatola 


X(1) 


X(2) 


X(3) 


X(4) 


X(5) 



Figura 3.1 Una semplice matrice 
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2 è X(1) ecc. Trovo che questo possa confondere, sicché tendo per semplicità a far 
iniziare le mie matrici con X(1). 

Dopo la creazione delle matrici passiamo allora ad assegnare dei valori alla variabile 
X; il risultato può essere visto nella Figura 3.2. 


X(1) 

3 

X(2) 

14 

X(3) 

22 

X(4) 

38 

X(5) 

73 


Figura 3.2 Una semplice matrice contenente valori per X 

Torniamo al nostro programma del gioco di Adventure. Dobbiamo decidere quali oggetti 
sistemare nel gioco, ed in quali Locazioni. 

La Figura 3.3 È di nuovo la griglia che abbiamo usato per la nostra mappa. Ho messo 
un “COLTELLO" nella Locazione 1 (il campo); un “FUCILE” nella Locazione 7 (la casa) 
ed un “GIOIELLO” nella Locazione 13 (la pianura). 


i. 

CAMPO 

2. 

SENTIERO 

0 

0 

0 

COLTELLO 

0 

7. 

CASA 

8. 

FORESTA 

0 

0 

|fucile| 

0 

0 

13. 

PIANURA 

0 

0 

GIOIELLO 

0 

0 

18. 

LAGO 

0 

0 

0 

0 

0 

0 

0 


Figura 3.3 La griglia per il gioco di Adventure contenente oggetti 
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Possiamo fissare le matrici per questi 3 oggetti come in Figura 3.4, 



Figura 3.4 La matrice degli oggetti nel gioco di Adventure 


Notate che ho assegnato agli oggetti la variabile nome OB% (il % significa valore o 
numero intero). Così quando si parla di OB%(1 ) vogliamo indicare il COLTELLO, mentre 
OB%(2) è il FUCILE e OB%(3) è il GIOIELLO. Ora possiamo ‘‘parlare’’ al 64 di questi 
oggetti, e manipolarli attorno alle nostre locazioni - in modo che quando digitiamo la 
parola COLTELLO questa viene intesa dal Computer con OB%(1). 

MODULO 1.4 

1 QntoS 

2 save"@@ : modulo 1,4", 3 : verify"modu.lo 1. 

4",3:stop 

3 rem 

147 : 

148 ^ 

149 re mM*m+*WM*m+**M*M+*M*W*** 
*****3f**^**5tEm3t!#*3»Eltf* 

150 rem Predispone le matrici Per 9li o 
99etti 

151 rem ********************************* 

160 d i m ob"; < 5 ).. obi ( 5 > .■ s ì t ( 5 > 

178 f or i = 1 to 3 : read ab'/. ( i ). ob$ < i ).. s i $ < 
i ) : next 

130 data 1col tei lo.. 4ui c e " un c n 1111 n 
190 data 7.• fu.ci 1 e j il vostro fucile e'ìu. 
i 

200 data 13j9ioiello.■ Per terra c'e' un 9 
i o i e 11 o 

287 : 

9PO 

283 
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290 rem Per stampare l'o99etto nella 9iu 
sta Posizione 

29 1 rem********************************* 
********************* 

300 for i = 1 to 3 : if obJ'X i >=P then Print 
s i $ < i > 

310 next 


Prima di ripartire a programmare notate che i moduli in questo capitolo si presume 
siano aggiunti ai moduli dell'ultimo, e non funzionano se usati da soli. 

Il Modulo 1.4 definisce le matrici per il nostro esempio e poi stampa i messaggi 
appropriati sullo schermo. 

Linea 160: questa è la linea che definisce le matrici in questo programma. L ordine DIM 
significa DIMensionamento ed è l’istruzione per dire al computer che state per definire 
le vostre matrici. In senso stretto non avremmo bisogno di una DIM in questo esempio 
dal momento che il 64 tratta matrici fino a 11 posizioni (ricordate che ciò significa un 
DIM (10), dato che si inizia da 0) - sicché dovreste aver bisogno di usare tale 
dichiarazione solo per DIM(IOO), diciamo, o DIM(30). Potrei però aver bisogno, senza 
dubbio, di aggiungere degli altri oggetti più tardi, quando l’Adventure si allargherà, 
sicché è meglio usare la dichiarazione DIM. 

OB%(5) ci offre 5 possibili valori per gli oggetti - OB$(5) ci da 5 nomi - e Sl$(5) ci da 
5 descrizioni. Dovremo solo usarne per il momento tre, e le linee 180-200 sono delle 
istruzioni DATA che devono essere sistemate in queste linee. 

Linea 170: una linea standard che dice al programma “READ i dati" uno alla volta, e 
lega ciascuna stringa con un valore intero. Sicché quando il 64 incontra OB%(1) allora 
stamperà o fi—COLTELLO” o “QUI C’È UN COLTELLO". 

Linee 170-200: Spesso i dati sono sistemati alla fine o all’inizio del programma, ma per 
chiarezza li ho messi qui. Si devono notare due aspetti qui: 

1. Il valore intero è lo stesso che per la Locazione. 

2. L’attuale parola in Sl$ è molto importante, e deve essere usata con riguardo. 

Posso illustrare questo ultimo punto cambiando il valore di Sl$ per OB%(2) - il 'fucile' - 
da “IL VOSTRO FUCILE È QUI” a "IL VOSTRO FUCILE È SUL TAVOLO". Ora questa 
seconda formulazione è più carina, la prima volta che si gioca; e quello che appare 
sullo schermo entrando nella Locazione 7 sarà: 

SIETE IN UNA CASA 

IL VOSTRO FUCILE È SUL TAVOLO 

Supponete ora di prendere il fucile e portarlo nella foresta, cioè lo dovete lasciare là 
per una qualche ragione. Tornando alla foresta più tardi voi vedreste il messaggio: 

SIETE IN UNA FORESTA 

IL VOSTRO FUCILE È SUL TAVOLO 
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Questo è evidentemente ridicolo, è farebbe sembrare dilettantesco il vostro gioco. È 
per questo che ho lasciato il più vago ma coerente “IL VOSTRO FUCILE È QUI". 

Linee 300-310: queste linee mostreranno in effetti la stringa Sl$ sotto la descrizione 
della Locazione, che riporta l’oggetto presente in essa. Quando un oggetto è in una 
particolare Locazione allora OB%(l) dà il valore di quella Locazione. Se osservate le 
Linee 180-200 ve ne renderete conto. 

Perciò ogni volta che la Locazione cambia, il 64 scandisce il vettore OB% partendo da 
OB%(1) e arriva fino a OB%(3), e se ognuno di questi numeri è lo stesso del numero 
della Locazione (che settiamo a P) allora stamperà Sl$ per quel numero. Questo dà 
l’impressione che quell’oggetto sia in quella Locazione. 

Il NEXT alla linea 310 manda il programma indietro, ad esaminare OB%(2) e OB%(3), 
e se essi pure sono nella Locazione, allora anch’essi saranno mostrati sullo schermo. 

Nota importante 

Quaodo battete per la prima volta il gioco, nel Capitolo 2, tutte le linee che descrivono 
le uscite dalle Locazione (Linee 6010, 6030, 6050, 6070, 6090, e 6110) terminano con 
GOTO 500. Dovete ora cambiarle da GOTO 500 a GOTO 300 perché ora indirizziamo 
il programma a questa Sezione del Modulo 1.4 per permettere di mostrare sullo schermo 
le appropriate stringhe che riguardano gli oggetti. Nell’ultimo capitolo non avevamo 
ancora scritto questa sezione, e per questo avevamo dovuto indirizzare il Programma 
alla Locazione 500. 

Vi raccomando di cambiare il valore dopo il GOTO da 500 a 300 (ora) per permettere 
al programma di funzionare quando lo provate. 

Se avete inserito il vostro programma finora in modo corretto, dovrebbe apparire il 
Programma 1.1, e se date il RUN dovreste essere ora capaci di muovervi tra le 
Locazione e vedere il coltello, il fucile e il gioiello mostrati nelle posizioni giuste. 

Programma 1.1 

1 9oto3 

2 save " 00 ; P ro9ramrna 1 . 1 " > 8 : ver i fy " p r o9r a 
roma. 1. 1 "8 : stop 

*-! r pro 

******************** 

100 rem 9ioco d'avventura 

1 0 1 

mmMmwMm******* 

207 : 

208 ; 

209 rerr!#*****it*^if***t****:t*t::-ft:tt:*tt^***t 

? 10 rem «.<*+ 1 a l a p o- i •? i ome 

21 1 re nmmMmmmM*+********+m+m+*+ 
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230 9oto 250 


23 6 

237 rem#**#*********##**#***###***##*#*# 
********************* 


■~~1 •“ l“* 

£- -2' 

rem 

setta 

1 a P osizìone 

239 

ii-ii 

rem********************************* 

240 

^ ^ 

p=p2 

•T W- ?T- ” T- T 


250 

if PC 

11 ther. 

on p 9oto 6000,6020,0,0 

,0,0 

, 6040 

, 6060 , 0 

, 0 

260 

*-* 

T» 

21 then 

OTi P -10 9otO 0, 0.6080.0 

• 0.0 

,0,6100,0,0 


270 

if PC 

26 then 

on P-20 9oto 0,0,0,0,0 

487 




488 




489 

■AiArXiA 

rem********************************* 

... j. 1 . 3 if a- X--XX*X X Ir X -X-X; X- X X 

430 

rem 

mostra 

1 e o P z i o n i s u 1 1 a d i r e z i o 

M «E* 




491 

rem********************************* 

********************* 

500 

Pri nt 

"Pii 01 3 

ndare" ; 

510 

it ri 3 

0 t h E‘ Vi 

Print" nord"; 

520 

if e3 

0 then 

Print" est"; 

530 

if s3 

0 then 

Print" sud"; 

540 

i f i,.i3 

0 then 

Print" ovest": 

545 




546 




547 

rem********************************* 


********************* 

548 rem su.brou.ti ne di istruzioni 

549 rem*####****#**#*#****#********#***# 
********************* 

550 Print chr$<13) 

560 i nP ut " i struz i ori i : " ; i $ 

787 • 

788 

789 rem#**####*##*##############*#**#### 
********************* 

790 rem subroutine del movi mento 
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791 rem********************************* 
********************* 

PCI fi 1 i n t~ 11 V-, " 1-.-... J .... ••.. Pi J-U. r. •-. _ ,-. CT • _ J ■-, 


300 

40 

if 

i$="n" 

and n>@ 

then 

P 2-P”5 ; 9oto 

C - 

81 0 
40 

if 

i$="e" 

and e>0 

t hen 

p 2 —pai goto 

2 

820 

i f 

! *=-«'•- » 

and -=" >0 

then 

P 2~p +5 9ot 0 

--> 

40 






830 

if 

1$="0 M 

and w>0 

then 

P2-F.1 : goto 



40 

O -i -7 

cj -3 *Z‘ 

!-! :-: 1-1 r (*■ n'i ************* * * * * ****** * * * * * * * * * * 
********************* 

04tì rem se rion ci sono Posizioni Possib 
ili nella direzione 

841 rem********************************* 
********************* 

850 Prini'Print"sPiacente - non Puoi Pre¬ 
ndere duella via ! !" 9oto 250 

5991 

5992 

5 9 Q 9 r e fl -, * * * * * * * * * * * ;* ****** * * * * * * ;* * * * * * * * 
* * * * * * * *+* * * * * :* * * * * * * i 

5994 rem descrizione delle varie Posici 
on i 

5995 r e m********************* ********** * 
********************** 

599e 

5997 rem***************** 

5998 rem 1 uo9o 1 

5999 rem***************** 

80P10 n f i Vi* ’’ jT~. 1 r'f.K i i-j il 'fi campo. M 
6010 n =0 : e=2 : s-y : 10=0 : goto 500 

6017 rem***************** 

6018 rem lu.o9o 2 

6 0 19 rem*+*************** 

6020 Print"£feiete su. un sentiero. " 

6000 n ~0 ■ e -—0 ■ s= i’ i.i.i— 1 • 9oto 5 80 

6037 rem******* ********** 

6038 rem lu.o9o 7 ( 

6 M 9 9 p r************** * * * 














6040 P r i n t " 21= i e t e i ri u ri a c a sa. " 

6950 n=2 e=8 ■ £ —0 i.o=0 : 9oto 506 
6057 r £ m+♦+♦♦*:+ .4 * M t+♦ ♦ ♦ * 

605o r e ni luo9o o 

6059 rÉr,,*4±*** + 4*44 + 4**4* 

6060 Pr int"Elsiete in una foresta." 

6070 n=0 e=0 ; s-13 : w=7 : 9oto 500 
6077 rem***************** 

6ti r 8 rem 1 u o9o 13 

6979 rem***************** 

6080 Print"asiete in una Pianura." 

6099 ,-,=8 ' e=0 : s=18 : w=0 : 9oto 500 

6097 rem***************** 

6098 rem luo9o 19 

6099 rem***************** 

6100 Print"asiete Presso un la9o." 

6110 n-13 : e=0 : s=0■w=0:9oto 500 

Manipolazione elementare di stringhe 

In questa fase abbiamo bisogno di iniziare a capire un po' come il 64 può manipolare 
le stringhe di testo, perché dovremo trattare con frasi e parole - e più importante di 
tutto dobbiamo sapere quando il giocatore ci dà una risposta carente o illegale. 

La manipolazione può ingenerare abbastanza confusione ai principianti - sicché mi 
limiterò ai comandi che si riferiscono in maniera specifica al gioco d’Adventure. Se 
volete saperne di più dovrebbero esservi di aiuto per allargare la vostra conoscenza 
sia “Introduzione al BASIC’, della stessa Commodore, o qualcuno dei libri o articoli 
sullo stesso tema. 

MODULO 1.5 

1 9oto3 

2 sa ve " @0 : modu. lo 1.5".. 8 : ver i f y " modi 'lo 1. 

5",8 ; stop 

3 rem 

687 

688 

689 rem********************************* 
********************* 

690 rem testa le direzioni di una sola 1 
ettera Per 

691 rem****#****#***#******************* 
********************* 

700 if i %- "n"ori$="e"ori$="s"ori$="o" th 
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en 800 

715 90+0 950 

937 : 

938 : 

939 rem##*#####*#**#######*#*#**#*#####* 
*********** #*#*#*#*#* 

940 rem testa i coro a lìdi di uri?, sol?, lett 
pr^ Per i$ 

********************* 

950 ifi$="i" thè ri 2000 
980 i f i $= " a " t-hen 2100 
987 ^ 

Ci O 
7 © •_■ 

989 rem####################*#####*##**## 


990 rem su.brou.tine di controllo Per due 

P 3 rri 1 p 

991 rem##*********************###*#*###* 
********************* . 

1000 for i = l to leriCif) 

1010 if mid$<i#,iil)*" " thè n 11 00 
1 020 next 

1030 Print"Pre9o. Puoi usare due Parole" 
:9oto 550 


Linee 700-710: Abbiamo già stabilito che il 64 risponderà ai comandi N, E, S o 0 (linee 
800-830 nel Modulo. 1.3). Queste due linee indirizzeranno i Comandi di Direzione (nord, 
est, ecc.) alla Routine del Movimento, alle Locazione 800-830 e tutti gli altri comandi 
nella sezione seguente di questo modulo (Linee 950-960), dove si controllerà se sono 
comandi validi. 

Linee 950-960: queste vi mandano proprio alle sezioni INVENTARIO o AIUTO del 
programma che si trovano più avanti. 

Linee 1000-1030: Abbiamo esaurito i nostri comandi possibili di una sola parola o 
lettera - e ora possiamo controllare se il giocatore ha inserito 2 parole o no. Questa 
piccola routine ricerca nell’input uno spazio bianco, e se non ne trova uno stampa il 
messaggio “USATE DUE PAROLE PREGO". 

La Linea 1000 scandisce l'intero input 1$ nel modo seguente: LEN(I$) è la lunghezza 
totale della stringa dato come numero (per. es. VAI in numero vale 3 mentre VAI NORD 
vale 8, poiché si conta lo spazio come uno). Così se l'input è VAI NORD questa linea 
diventa FOR 1=1 TO 8, ed il 64 partirà da 1 (la prima lettera, che è “V” in questo caso) 
e avanza lungo la stringa fino a 8 (l’ultima lettera, che è “D "). 
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La Linea 1010 controlla “b" (spazio) quando si scandisce la stringa. MID$ ha la funzione 
di “guardare in mezzo” alla stringa - partendo dalla posizione I (che parte da 1 e arriva 
a 8) e poi estrarre un singolo carattere (a causa del numero 1 nel comando MID$ 
(l$,SP, 1 )) Se trova uno spazio singolo allora fa avanzare il programma alla Linea 1010. 
Se ha scandito tutta la stringa senza trovare uno spazio, allora la Linea 1030 stampa 
l’apposito messaggio “USATE DUE PAROLE, PREGO”, ed il programma torna indietro 
alla Locazione 550 per attendere un altro input. 

Ciò può essere illustrato da un semplice diagramma, nel Flow-Chart 3.1. 

Il prossimo modulo contiene i comandi di manipolazione-stringhe più difficili da controlla¬ 
re - ma come con altre sezioni non è così duro come sembra. 


MODULO 1.6 

1 9oto3 

2 save"@0 :roodu.lo 1. €• "..8 : ver ify"modalo 1. 
6% 8 : stop 

3 refi 

1087 : 

1088 : 

1089 rerii**'**i*f^=f**^^*^*^******^^**i***-** 

1030 rem su.broutine Per convertire if in 
ve$ e no$ 

1091 r*vm*m*mmw*mmM+*m*m*M*M 

1100 for sP—1 to lenti 

1110 i f f'i i d$ < i t , SP, 1 > = " " then 113@ 

1120 next 

1130 ve$= 1 ef t$ < i $, sP --1 > 

1140 not=r i 9ht f ( i $ . ( 1 en < i $ > -sP > > 


Linee 1100-1120: Queste linee controllano la lunghezza di 1$, ancora una volta (come 
faceva la Linea 1000 nel Modulo 1.5) ogni volta che la variabile SP (per SPAZIO) è 
usata. Sappiamo che dovrà esserci uno spazio se il loop nelle Linee 1000-1020 ne 
troverà uno, o in caso contrario si ritornerà ancora all’input ISTRUZIONI. Ora vogliamo 
trovare dove sia lo spazio, e quindi chiameremo la parte di 1$ prima dello spazio VE$ 
(VERBO), e la parte di 1$ dopo lo spazio NO$ (NOME). 

Linea 1130: Questa è la linea che individua la parte di 1$ prima dello spazio. È 
abbastanza facile ragionarci quando un esempio. Se il comando 1$ è VAI NORD allora 
lo spazio corrisponderà al numero 4 (essendo al quarto posto). Perciò VE$ è la parte 
sinistra di 1$ che comprende le prime tre lettere (SP - 1 è 4 - 1 =3), cioè VAI. 
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INSERISCI 

ISTRUZIONI 

1 $ 


\ 





VISUALIZZA 
“PREGO USA 
DUE PAROLE” 


VAI ALLA 
ROUTINE DI 
MOVIMENTO 


VAI ALLE 
ROUTINES DI 
INVENTARIO 
O HELP 


VAI ALLA 
PROSSIMA 
PARTE DEL 
PROGRAMMA 


Flowchart 3.1 Trattamento di base delle stringhe 








Linea 1140: Trattiamo la parte rimanente di 1$. Usiamo la funzione RIGHTS per 1$ (la 
parte destra) e la memonzzaztone - ma questa volta usiamo tutta la lunghezza della 
stringa (LEN (1$)) e sottraiamo lo spazio. Così se usiamo VAI NORD ancora, LEN(I$) 
sarà 8 (sette lettere più uno spazio) e NO$ sarà la parte destra di 1$ partendo dalla 
quarta lettera (8-4 = 4) che è la N di NORD. 

Quindi abbiamo diviso VAI NORD in VE$ e NO$, contenenti rispettivamente VAI e 
NORD. Può sembrare un po' complicato - ma dobbiamo essere in grado di riconoscere 
sia VE$ che NO$ nel prosieguo del programma. 

Prova del Programma 

Se date il RUN al programma dovreste trovarlo ora abbastanza più piacevole di quanto 
era prima, avendo aggiunto gli oggetti nelle Locazioni, all’inizio di questo Capitolo. 
Possiamo provare i Moduli di manipolazione delle stringhe battendo qualsiasi istruzione 
che il programma non sia in grado di riconoscere. Tentate inserendo VOLA o SALTA, 
dovreste ricevere la risposta “USARE DUE PAROLE PREGO". Per testare il Modulo 
1.6 dobbiamo invece battere due parole (provate con MANGIA FORMAGGIO), e poi 
uscire dal programma battendo RUN/STOP e RESTORE. Battete ora, in modo diretto, 
PRINT VE$, ed il computer dovrebbe stampare “MANGIA". Ora, ancora in modo diretto, 
inserite PRINT NO$; questa volta dovrebbe apparire sullo schermo “FORMAGGIO”. 
Se questo non dovesse succedere, esaminate attentamente se avete fatto degli errori, 
prima di giungere al prossimo Modulo. 

Inserite I o A, avrete un messaggio di errore, ma correggeremo fra poco tutto ciò 
aggiungendo la routine di INVENTARIO e di AIUTO. È più divertente pensare alle 
routine PRENDI e BUTTA, che ci consentiranno infine di raccogliere quel coltello e quel 
fucile, e di portarli con noi. 


Aggiungere e togliere 

MODULO 1.7 

1 9oto3 

2 sa ve " @0 : modu. lo 1.7 ", 8 ; ver i f y " modu lo 1. 

c.F.oP 

3 rem 

1187 : 

1188 : 

1189 rem******************************** 
****************;****** 

1190 rem su.broutine Per scandire vari co 
mandi ve$ 

1131 rem******************************** 
********************** 

1208 i f ve$= " P r end i " or vef-= " a.cch i a.P P a. " or ve 
$= " afferra. " orve$= " P orta. " then 2200 
1210 if‘ve$="butta "orve$="Perdi "orve$=" la. 
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scia"then 2300 

1220 i f ve$= " u.cc idi" then 2500 

1230 Print : Print "nori so come fare ■'"vet 

" ■- " : 9oto 550 

1387 : 

ISfeS : 

1989 r em******************************** 


1990 r e m s e z i o ri e dell '' i ri v e n t a r i o 


2000 P r i nt "il tuo i nventar i o e ; : i v=0 
2010 for i=l to 3 

2020 i f obM < i ) =-1 then P r i nt ob$ < i > : i v= i 
v+1 

2030 next 

2040 if iv=0 then Print"niente" 

2050 9oto 500 

2087 : 

2088 : 

2089 rem******************************** 


2090 rem sezione di aiuto 

2091 rem****#**###*#####*#***##********* 


****jt:###***#*#*##jt:*#*# 

2100 if P=18 then Print"Puoi tentare 
ucciderlo" : 9oto 559 
2110 Print "non c"'e' molto aiuto 4u.i. 
Paura" : 9oto 550 


2187 

2188 


2189 rem ##*#***#************##*****& 


di 


ho 


2190 rem subroutine di a^uisizione 

2191 rem######*###*#*#*####*####*#**#### 


2200 for i=l to 3 

2219 if ob $( i>=no$ then 2239 

2229 next * 

2230 i fob.’i >' i >=-l thenP r i nt "ce 1 ha i " : 9ot 
O 500 

2259 i f'obx <. i ) OP thenP r i nt " non e / q u i " : 9 
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1 


oto 500 

P r int"ok" : obK( i>=- 
9C'tO 500 


2290 rem subroutine del trabocchetto 

2291 rem##############**###########*#*## 

*4i*4!*#*if#**##^***4E^*^^ 

2300 for i=l to 3 

2310 if ob $< i >=nn$ then 2330 

2320 next 

2330 if'ob";< i >0—1 thenPrint"iìOìì ce l 'hai 
" : 9oto 500 

2340 Pr int"ok " : obV .< i >=P 
2350 9c»to 500 


22^0 

2270 

2237 

2233 

2239 


Linee 1200-1230: Avendo suddiviso I dobbiamo ora esser in grado di riconoscere con 
una certa facilità i comandi e agire in conformità. Per questo programma-esempio ne 
ho selezionati in realtà pochi, ma ne "Il Pianeta Dell'lncubo" il numero dei verbi concessi 
diventa così alto che non mi hanno concesso spazio abbastanza, obbligandomi ad una 
rinumerazione. 

La linea 1230 non è altro che la risposta standard, quando il programma esamina un 
comando che non riconosce, passando poi il controllo all’input Istruzioni - in modo che 
se battete SCALA la risposta dovrebbe essere ‘‘NON SO COME FARE SCALA". 

Linea 2000: Se avete inserito I come risposta, allora il programma dovrebbe andare a 
questa linea e stampare "IL VOSTRO INVENTARIO È:", e la variabile IV viene posta 
a zero. 

Linee 2010-2030: Questo breve loop spazzola le matrici dei dati relativi agli oggetti. Se 
OB%(l). è vero (in altre parole è uguale a -1) allora il 64 stamperà OB$ (il nome 
dell’oggetto). 

Ogni volta che un nuovo oggetto è aggiunto all’Inventario, IV è incrementata di 1. È di 
grande significato, in un programma in cui si dovrebbe restringere il numero degli 
oggetti, che il giocatore possa portarne uno in qualsiasi momento (ho scritto proprio 
questa routine in "Il Pianeta Dell'lncubo’’). 

Linee 2040-2050: La linea 2020 usa una dichiarazione IF per controllare se OB% è 
vero (= -1). Se non lo è il programma arriva alla linea 2040 e stampa "NIENTE” se IV 
= O. Poi ritorna alla stampa delle uscite alla linea 500. 

Linea 2110: In questa fase non c'è bisogno di aiuto dato che la linea stessa fornisce, 
al comando "A”, una locazione dove andare. 

Linee 2200-2260: La routine GET segue la stessa procedura della routine INVENTORY, 
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eccetto il fatto che controlla se NO$ è la stessa parola dell’oggetto nella Locazione 
(OB$) e quindi vi dice che avete già questo, se OB$ è nell’Inventario, o che l’oggetto 
non è qui, se OB% è diverso da P. Nella Linea 2250 la condizione OB%(l)-1 mette 
nella condizione di leggere l'oggetto in Inventario, nella Linea 2020. 

Linee 2300-2350: Ancora la stessa routine, eccetto il fatto, questa volta, che la Linea 
2340 risistema l’oggetto nella nuova Locazione P. 

Se ora fate partire il programma (non dimenticate prima di salvarlo su nastro) dovreste 
trovare che potete prendere gli oggetti, e se poi tornate in quella Locazione, questo non 
dovrebbe più esserci. Se ora lo lasciate in qualche altro posto allora lasciando la 
Locazione e ritornando ad essa, l’oggetto dovrebbe essere mostrato. Infine se controllate 
il vostro inventario dopo che avete prelevato qualcosa, la dovreste trovare. 

C’è una sensazione di meta raggiunta, per esser giunti cosi lontano - perché ora alcune 
delle possibilità inseribili nel programma sono rese operative. Vi raccomando di passare 
un po' di tempo trafficando con i listati, aggiungendo altri oggetti in altre Locazione, 
cambiando le dichiarazioni DATA nelle linee 180-200. Potete anche aggiungere oggetti 
cambiando l’istruzione FOR I = 1 TO 3, e se voi avete più di cinque oggetti, anche le 
istruzioni DIM. 

Per quelli di voi a cui piacciono i Flow-chart, ne ho incluso uno in questa fase, 
Diagramma di Flusso 3.2 (pag. 42). Sembra un po’ complicato ora, ma è lo stesso 
diagramma della Figura 2.6 con in più il contenuto di questo capitolo. 

Nel prossimo capitolo cominceremo ad aggiungere una nuova dimensione introducendo 
un paio di “pericoli" per il nostro giocatore. 
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ON P 


DEFINISCI 

LOCAZIONE 


LOCAZIONI 


UN 

SOGGETTO^ 


MOSTRA 

POSSIBILI 

USCITE 


MOSTRA ' 
L OGGETTO , 


STAMPA 

ISTRUZIONI 

1 $ 


■"'(SÉ -X NO 

N. E. S. -■ 



METTI IS 
IN VE$ 

E NO$ 




FASE DI 
MOVIMENTO 


ROUTINE DI 
INVENTARIO 
E DI HELP 


ROUTINE 
DI GET 


ROUTINE 
DI DROP 


DIREZIONE 
sEE VALIDAv 


' MOSTRA 1 
"VIA NON 
.PERMESSA , 


Flowchart 3.2 II gioco di Adventure con inclusi gli oggetti 
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CAPITOLO 4 

TRABOCCHETTI E PERICOLI 


La storia di Romeo e Giulietta è certamente non nuova - il giovane incontra la ragazza, 
si innamora di lei, i genitori non le concedono di sposarlo, fuggono insieme, e quindi a 
causa delle incomprensioni scoppia la tragedia. Quello che dà fascino universale a 
questa storia ed ha portato a così tante variazioni, è la quantità di ostacoli e difficoltà 
che l’eroe e l’eroina incontrano durante la loro breve relazione. 

È lo stesso in ogni aspetto della vita - noi troviamo più gusto nelle cose che cominciano 
in maniera negativa - specialmente nella nostra immaginazione e fantasia. E i giochi 
di Adventure non fanno eccezione! 

Dobbiamo cominciare a pensare alle varie difficoltà e pericoli che il nostro Intrepido sta 
per incontrare nel suo viaggio attraverso la nostra Adventure. Dopo tutto il raccogliere 
oggetti e poi lasciarli cadere, vagando tra le locazioni, non è propriamente un’azione 
così eccezionale; è invece la risoluzione degli enigmi e la fuga dai pericoli che rende il 
giocatore Adventure così attraente e frustrante allo stesso tempo. 

Incontriamo pericoli di ogni genere e grandezza (e anche varietà di colore). Alcuni sono 
abbastanza prevedibili - come un mostro che vi si avvicina - una Strega che vi lancia 
un incantesimo - cadute in buche - e così via. Alcuni sono un po’ più subdoli - un 
indovinello che dovete risolvere per raggiungere il vostro premio - un labirinto in cui 
siete intrappolati e di cui non potete trovare l’uscita - e innumerevoli altri. 

Teniamoci ancorati al prevedibile e vediamo di scoprire come inserirne un po’ nel nostro 
programma esempio. 

Pensando alle nostre difficoltà 

Come nella maggior parte della programmazione, il più difficile è pensare ai problemi 
della prima fase - e questo è il motivo per cui mi limito per ora al prevedibile. Quando 
stavo creando il mio programma esempio decisi di animarlo introducendo una palude 
(o sabbie mobili) nella Locazione 2, (il sentiero) e un mostro nella locazione 18 (il lago). 
Questi possono essere aggiunti alla nostra mappa come in Figura 4.1 riportata a pagina 
seguente. 

Avendo messo i pericoli nella pianura, avevo bisogno di una soluzione per essi, e così 
decisi che per sfuggire al mostro avremmo avuto bisogno di raccogliere il fucile (in altre 
parole esso dovrebbe essere nell'INVENTARIO), e se aveste il gioiello nella locazione 
13 allora il suo potere magico vi proteggerebbe dal pericolo della palude. Quasi una 
banalità - ma è solo un esempio per dimostrare il principio. 

I 

Torniamo alla tastiera per vedere come trattare l’inserimento della fuga dai pericoli. 
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1 . 

CAMPO 

2. 

SENTIERO 

^PALUDE/ 

•vwwv* 

0 

0 

0 

COLTELLO 

0 

7. 

CASA 

8. 

FORESTA 

0 

0 

FUCILE 

0 

0 

13. 

PIANURA 

0 

0 

GIOIELLO 

0 

0 

18. 

LAGO 

SMOSTROJ 

Vwwwy 1 

0 

0 

0 

0 

0 

0 

0 


Figura 4.1 Griglia del gioco di Adventure con i pericoli 


MODULO 1.8 

1 9oto3 

2 save " @0 : moda lo 1.8 ", 8 : ver i f y " rnodu lo 1. 
8% 8 : stop 

3 rem 

107 : 

108 : 

109 rem ********************************* 
********************* 

110 rem inizializza le variabili 

111 rem###*#######* **************** * **** 
********************* 

120 £w’i=0 : mui‘;=0 

387 : 

388 : 

389 rem#*#*#***#*##**#*#***********#**** 
********************* 
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390 rem ricerca le Posizioni coi Perico 
li 

391 rem#############*####*****#*#*###### 
####*#********#*#**** 

400 if P=2 and sw';02 then 7000 
410 if P = 18 and mw?i02 then 7020 


590 rem condizioni speciali Per evitare 
la stampa delle direzioni 

591 rem######################*######*### 


600 if P=2 and sw."i02 then 9tì0 
610 if P = 18 and mwX02 then 900 
887 : 


888 

889 rei 

a#*########*######### 

890 rem subroutine Per evitare movimenti 
Per sf'u.99ire al Pericolo 

891 rem###*#########**####*###########*# 
###*############*##*# 

900 ifi$="n"ori $=' " e "ori$="s"ori *= "o"then 
Print"non Puoi farlo...ora!!" : 9oto 550 

6987 : 

6988 : 


6990 rem mostra i Pericoli 

6991 rem###*##*#####**########*#*###*### 
##########*#######**** 

7000 Print"siete caduti . 

7010 9oto 550 

7020 print"un mostro e / apparso sul la9o 

il 

7030 9oto 550 

Questo modulo è in realtà un insieme di piccoli moduli legati tra di loro con le altre parti 
del programma che avete già inserito e salvato su nastro. 

Linea 120: queste due variabili sorto la chiave per dire al 64 cosa fare quando arriva 
ad una condizione speciale (in altre parole un pericolo o una simile insolita situazione). 
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Dando a SW% e MW% (che stanno per Palude e Mostro) un arbitrario valore di 2 una 
volta che il pericolo è stato superato, posso evitare o no le parti del programma che si 
riferiscono a quelle speciali condizioni. 

Perciò partiamo dando ad esse un valore O (potrebbe essere un altro qualsiasi, 
naturalmente) in modo che se il computer incontra il pericolo affronterà la parte del 
programma che vi si riferisce. (Se trovate un po' di confusione nel leggere ciò, non 
preoccupatevi: dovrebbe diventare tutto più chiaro poi). 

Linee 400-410: qui incontriamo effettivamente il pericolo. Se il programma è nella 
locazione 2 o locazione 18 esso controlla se SW% nella locazione 2, MW% nella 
locazione 18, sono settati a 2. Noi tuttavia li abbiamo messi proprio a zero alla linea 
120 - sicché il programma salta alle linee 7000 e 7020 rispettivamente. 

Linee 600-610: poiché abbiamo posto il giocatore di fronte ad un pericolo, dobbiamo 
evitarlo uscendo dalla locazione, battendo proprio N o S (sennò potrebbe risultare 
piuttosto facile fuggire). La linea 600 è per la locazione 2, e sottolinea che se SW% 
non è uguale a 2 (e sarà uguale a 0 finché non avrete superato la difficoltà) allora 
saltate la routine del movimento e andate (GOTO) alla linea 900. La linea 610 fa 
esattamente la stessa cosa per la locazione 18. Finché non avete sconfitto il pericolo 
la variabile SW% sarà posta a 2 - il resto in questa parte di programma è ignorato, e 
l’usuale procedura di movimento è ancora una volta permessa. 

Linea 900: il programma controlla se il giocatore ha tentato di fuggire dalla locazione 
battendo N, S, E, o O. Se lo ha fatto allora questa linea stamperà “NON POTETE 
FARLO... ORA!!” e toma al messaggio di richiesta di input ISTRUZIONI?. Per quante 
volte il comando per spostarsi sia dato, sarà impossibile per il giocatore fuggire dal 
nostro banale pericolo. 

Linee 7000-7030: queste linee mostrano proprio il pericolo sullo schermo e rimandano 
il controllo al modulo di istruzioni alla linea 550. 


MODULO 1.9 

1 9oto3 

2 save"@0 ; modulo 1.3" ^ 8 : ver-if y "modulo 1. 

9% 8 : stop 

3 rem 

370 ifi$="nuota"or i$="9alle99ia" and P= 

2 then 2400 

1220 i fve$= " ij.cc idi” ther.2500 

2100 if P = 18 theTiPririt "Puoi tentare di u 

ccider1o" : 9oto 550 

Questo è un modulo di tre linee di riempimento, che si inserisce tra le parti del 
programma, ma non era applicabile prima. 

Linea 970: una delle parti più difficili nella programmazione di Adventure è tentare di 
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pensare a tutte le varie risposte che il giocatore può dare per cercare di scappare dalla 
sua situazione imbarazzante, una volta che abbia incontrato un pericolo. Svilupperò 
questo in grande profondità nel programma "Il Pianeta Dell’lncubo", nella seconda 
sezione del libro - ma questa linea è sistemata qui per illustrare la questione. 

Ho presunto che, essendo caduti nella palude, due delle più verosimili risposte potrebbe¬ 
ro essere NUOTA o GALLEGGIA. Sicché in anticipo questa linea stabilisce che se la 
risposta è NUOTA o GALLEGGIA (e la locazione è la 2, poiché noi non vogliamo dare 
una risposta di fuga essendo arrivati alla locazione sbagliata - potrebbe sembrare 
stupido!!) allora il programma è indirizzato alla linea 2400, la quale è una speciale 
sezione per i pericoli della Palude (vedi Modulo 1.10). 


MODULO 1.10 


1 9oto3 

2 javt"@0 : modu.In 1. 10" , 8 : ver if m "rrinrjiilo 1 
.10",8 : stoP 


8 rem 

<L- O I 

2388 : 


2389 rem******************************** 
********************* 

2390 rem subroutine della Palude 

2391 rem**************** ******** ******* * 
********************* 

2400 if ob/.'(3>=-1 then Print"ok - sei soP 
ravvissuto" : sw5£~2 : goto 500 
2410 Print"sei troPPo le99ero senza, il m 
a. 9 i co gioiello, sei affogato ! " : stop 

2487 : 

2488 : 

2489 rem******************************** 
********** *********** 

2490 rem su.br ou.ti ne dell -' uccisione 

2491 rem******************************** 
********************* 

2500 if POIS then 2540 

2510 i f obX < 2 )=-l the n P r i nt " ok " : mw?i=2 : 9 

oto 500 

2520 if ob/X 1 >=-1 then Print"Proprio con 
un coltello'? stai scherzando !" : goto 550 
2530 Print"non ho niente con cui uccider 
lo !"•9oto 550 

2540 Print"uccidere che cosa?" : goto 500 
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Linea 1220: è lo stesso princìpio della linea 970, ma in questa sezione del programma, 
osservando il comando VERBO (VE$) si vede che possiamo quasi certamente scrivere 
UCCIDI qualcosa. Infatti se voi battete UCCIDI semplicemente, il programma risponderà 
“USATE DUE PAROLE, PREGO”. Tentare per vedere. Come prima questa linea 
indirizza il programma alla linea 2500 se la vostra risposta all’apparizione del mostro 
nel lago è di tentare di uccìderlo. 

Linea 2100: questa linea aggiunge la sezione AIUTO del programma. Sembra sensato 
mettere alla prova e aiutare allo stesso tempo il giocatore, sicché se arriva alla locazione 
18 e batte A questa linea mostrerà il messaggio “POTETE TENTARE DI UCCIDERLO", 
prima di ritornare al comando “ISTRUZIONI”. 

Le routines di help tradizionali sono vaghe e confondono, in giochi di Adventure, ma ci 
sono periodi in cui il giocatore sarà eternamente grato per un suggerimento, in una 
parte difficile della lotta. Naturalmente potete dare informazioni false o anche condurre 
deliberatamente il giocatore verso la sua condanna - sembra così carino nelle Adventu¬ 
re!! 

Abbiamo raggiunto il modulo finale del mio programma esempio - due piccole sezioni 
che trattano dei due pericoli che abbiamo introdotto. Se osservate le linee 2400 e 2520 
noterete che ho posto le variabili SW% e MW% e 2 finché il pericolo non sia superato 
con successo - il che permette al giocatore di uscire da questa locazione e assicurerà 
che quando incontrerà di nuovo il pericolo, questo non sarà mostrato sullo schermo. 

Linee 2400-2410: se avete battuto la risposta giusta (dopo essere caduti nella palude) 
alla linea 2400 il programma per prima cosa controlla se avete il gioiello magico. OB%(3) 
è il gioiello, se ricordate, e quando OB%(3)=1 allora dovete averlo in inventario. Se è 
così, allora il programma mostrerà il messaggio "OKAY - siete sopravvissuti" - pone 
SW% a 2 - e torna indietro alla linea 500 (per mostrare ora le possibili uscite attraverso 
cui possiamo lasciare la locazione). Se stiamo scrivendo un programma più complicato 
e vogliamo controllare un numero maggiore di pericoli, avremo bisogno di tornare 
indietro alla linea 400 per controllare a questo punto altre condizioni particolari. 

La linea 2410 è la risposta standard nel caso il giocatore non abbia il gioiello nel suo 
Inventario, e dopo aver ricevuto l’istruzione NUOTA o GALLEGGIA, mostrerà l'oscura 
risposta. 

“SIETE TROPPO PESANTI SENZA IL GIOIELLO MAGICO. SIETE ANNEGATI!" 
e quindi provoca l’END del programma. Questo messaggio darà almeno al giocatore 
un’idea di quello che dovrà fare la prossima volta. Notate il numero di spazi tra le parole 
MAGICO e GIOIELLO. Perché questo ingrandisce il messaggio sullo schermo, e non 
spezza le parole, il che farebbe apparire GIOIELLO parte in una linea e parte in un’altra. 

Linee 2500-2540: queste ingannevolmente semplici linee nascondono un bel po’ di 
concetti, e la maggior parte dei principi della programmazione dei pericoli che ho usato 
ne “Il Pianeta Dell’lncubo". 

Per prima cosa abbiamo bisogno di trattare la risposta UCCIDI che non riguardasse il 
mostro del lago. La linea 2500 dirotta semplicemente il programma oltre tutte le risposte 
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fino alla linea 2540, che è una risposta standard al comando UCCIDI usato in ogni altra 
locazione. 

Ora siamo al momento in cui giocatore ordina UCCIDI IL MOSTRO, alla locazione 18. 
Ho delineato solamente tre possibilità in questo programma: 

1. Il giocatore ha il fucile - e può avere il coltello. 

2. Il giocatore ha il solo coltello. 

3. Il giocatore non ha nessuno dei due. 

Nel Caso 1 (il giocatore ha il fucile), la linea 2510 rileva che OB%(2) è nell'INVENTARIO 
e dà la risposta “OKAY", pone MW% a 2 e riporta il giocatore in gioco. 

Ora egli può fuggire dalla locazione (notate che abbiamo stabilito GOTO 500 e non 
GOTO 550) e tornare salvo ad un altro stadio. Se il giocatore ha il coltello assieme al 
fucile, non ci sarebbe nessuna differenza, naturalmente. Finché OB%(2) è vera questa 
linea è eseguita. 

Nel Caso 2 la Linea 2520 riconosce questo fatto, ma non permette al giocatore di 
fuggire. Così scriviamo una risposta adatta e poi torniamo al comando ISTRUZIONI. 
Infine, nel Caso 3 (né fucile né coltello) c’è una risposta standard “NON HO NULLA 
CON CUI UCCIDERLO”, prima di tornare indietro. 

È importante aver chiaro che la Linea 2500 o la Linea 2530 saranno stampate se 
scriverete UCCIDI in qualsiasi altra Linea. 

Alcune idee o tecniche di programmazione che ho introdotto in questo Capitolo scalfisco¬ 
no solamente la superficie della costruzione di una buona Adventure. Infatti questa 
parte del vostro Programma certamente occuperà il minimo spazio, ma richiede la 
maggior parte del tempo per essere preparato e corretto in seguito. Il pensare a 
veramente intricate e frustranti difficoltà adatte al vostro Gioco e quindi vederle funziona¬ 
re, quando qualcun altro tenta di percorrere i passaggi per uscire, è certamente il più 
gratificante aspetto della stesura di una Adventure. 

Per aiutarvi a capire i problemi di base della programmazione, ho aggiunto un diagramma 
di flusso che dovrebbe essere applicato in ogni caso, per delineare il problema. (Vedere 
Diagramma di Flusso 4.1) (pag. 50). 

Se avete inserito correttamente il Gioco d’Adventure lungo il cammino, dovrebbe essere 
possibile spostarsi liberamente da una Locazione all’altra finché non si incontra un 
pericolo - e quindi essere impediti, nel tentativo di uscire, se non possedete l’oggetto 
appropriato nel vostro inventario. Dovreste essere capaci di raccogliere oggetti, e, 
quando tornate a quella Locazione, l’oggetto non dovrebbe più essere mostrato. Al 
contrario, se lasciate cadere un oggetto, allora tornando in quella Locazione esso 
dovrebbe essere ora mostrato, dopo la descrizione della stessa. 

Per verificare la vostra conoscenza dei principi implicati o no, provate ad aggiungere 
una nuove Locazioni, ed un nuovo pericolo in esse. Potete anzi tentare di aggiungerne 
parecchie, e anche nuovi pericoli. 

Non abbiate paura di far esperimenti - sia sulla carta che sul 64. Il tempo speso ora in 
questo, vi faciliterà grandemente sia per la comprensione della seconda parte del libro, 
sia per la vostra abilità nello scrivere più tardi la vostra personale Adventure. 
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INIZI ALIZZA 
LE VARIABILI 


I 




TORNA AL 
PROGRAMMA 


Flowchart 4,1 Pericoli nel gioco di Adventure 





PARTE II 




CAPITOLO 5 


LA STESURA DELLA TRAMA 


La maggior parte dei libri e articoli sulla programmazione vi dirà che la stesura di 
qualsiasi tipo di software dovrebbe seguire alcune direttive ben definite, ed i giochi di 
Adventure non dovrebbero fare eccezione. Ho trovato che a dispetto dell’ovvio desiderio 
di sederci davanti alla tastiera e cominciare a programmare direttamente, questo è uno 
dei momenti in cui il consiglio - il principale, io penso - è vitale. So che ciò è noioso - 
infatti anche il mio stesso stile di programmazione risente in modo fatale dell'attrazione 
esercitata dall’hardware - ma se non vi sforzate prima di tutto a lavorare sulla carta, 
senza farvi prendere dall’intreccio della vostra stessa storia, otterrete che (oltre a crearvi 
problemi futuri) dovrete riscrivere, in un po’ di settimane extra, il vostro programma 
ripetutamente. La trama (o forse si dovrebbe usare un termine migliore), è cruciale, sia 
per il successo del gioco sia per quanto riguarda la struttura del programma. 

In molte fasi il processo di creazione di un’Adventure qualificante è simile ai metodi che 
i registri usano per costruire un film (un concetto su cui tornerò più avanti nel capitolo) 
e trovo che sia la fase più emozionante della mia programmazione. 

È necessario sia che definiate il tema di base (scrivere la storia - in altre parole) sia 
che poi sappiate visualizzarla, come se la steste osservando attraverso gli occhi dei 
vostri spettatori. 

Parte dell’emozione in molti dei giochi di Adventure che ho provato, è dovuta alla 
sensazione di partecipare realmente allo scenario. Se il gioco avrà successo ciò dovrà 
essere imputato alla combinazione dei temi che spiegherò in questo capitolo, ma che 
comincio a riassumere in questa fase, per fissarli già da ora nella mente - nel mentre 
cominciate a stendere l’inizio della vostra trama. 

Il successo e la soddisfazione del vostro gioco dipenderanno da: 

1. La vostra abilità nell’usare la terminologia adatta per creare immagini nel racconto. 

2. La profondità e plausibilità della trama. 

3. L’immaginazione della persona che userà il gioco. 

A proposito dell’ultimo punto: voi non avete nessun controllo sull’abilità e sull'immagina¬ 
zione dei potenziali giocatori, ma poiché succede che i giocatori di Adventure sono 
spesso appassionati di fantascienza e di “fantasy ”, allora sembra ragionevole supporre 
che essi abbiano immaginazione ben sviluppata, sicché penso che possiate considerare 
il punto 3 come assodato. Le altre due caratteristiche giocano perciò un ruolo più 
importante. 
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Cominciamo il racconto 


Come ho prima accennato, i giochi di Adventure tendono ancora, in parecchi casi, a 
seguire lo stile delle versioni originali create per grossi computer, o i ben noti giochi di 
Scott Adams - un viaggio attraverso i temi di “dungeons and dragons", fantascienza, 
“fantasy e altri ancora. Una veloce scorsa ad una qualsiasi rivista farà saltar fuori una 
vanetà di titoli come "Il Castello Misterioso", “Il Covo di Gracula”, “L'Isola Del Destino”, 
"Il Racconto Del Drago e via di seguito. 

Naturalmente non dovreste aver bisogno di seguire questa tendenza, e ci sono parecchi 
giochi con una trama totalmente diversa (fuga dal riformatorio, alla ricerca dell’ideale 
compagno della vita, l’avventura di una notte passata fuori città) che aggiungono un 
gradito tocco di originalità per giocatori smaliziati. Dal momento però che il tema 
“fantasy” è così popolare (ed uno di quelli che più mi divertono) ho basato il mio gioco 
sul genere di trama che si riferisce a questo familiare filone. 

Ho letto una volta che non ci sono trame originali per i racconti - solo differenti variazioni. 
Ciò è naturalmente vero, ma “Guerre Stellari” è una perfetta dimostrazione di abilità 
nel prendere una trama semplice e trasformarla in un successo strepitoso! In tutte le 
nostre storie abbiamo bisogno di alcuni generi di esplorazioni o di scopi da raggiungere 
(trovare tesori, liberare la principessa, sfuggire da una situazione pericolosa, scoprire 
il significato di un enigma, ecc.). Abbiamo bisogno di un'eroina o di un eroe ben 
riconoscibili (nell’Adventure il giocatore acquisisce tale ruolo) e, di solito, o di un malvagio 
o di qualche altro conflitto per i nostri personaggi principali. 

Quando scrissi la mia storia usai i seguenti passaggi: 

1. Scegliere l'ambientazione (per es. fantasy, orrore, fantascienza). 

2. Scegliere la ricerca o lo scopo (per es. trovare tesori, sfuggire ad un mago). 

3. Decidere tra il ruolo di eroe/eroina. 

4. Scegliere i personaggi principali (per es. mago, vampiro, contessa). 

5. Scrivere un brogliaccio del racconto. 

6. Tracciare una mappa semplificata con un po’ di Locazioni base. 

7. Tradurre la storia in tavole. 

Può sembrare che ci sia molto duro lavoro da fare prima di por mano alla tastiera, ma 
molti dei passi della stesura della vostra trama seguiranno in modo così naturale che 
tutto diventerà affascinante e tenderà da solo alla meta. E, come ho già lungamente 
detto, il tralasciare questa fase o causeràpiù tardi un lavoro aggiuntivo, oppure alla fine 
farà risultare un prodotto non soddisfacente. 

La scelta deH’ambientazione 

Il tipo tradizionale di gioco d’Adventure che più pesantemente prende spunto dal mondo 
della fantasy di Tolkien e degli scrittori che a lui si ispirano, abbonda di elfi, draghi, 
streghe, castelli trasudanti umidità, magia, misteri e cose simili. Forse è in realtà la 
nostalgia dei racconti di fate della nostra infanzia che spiega in parte questa popolarità, 
forse una ragione più profonda, ma per il crescente numero di appassionanti di 
Adventure, la gamma di possibilità aperte dalla scelta di questa ambientazione aggiunge 
motivi e originalità che sarebbero meno realistici nella più prosaica realtà quotidiana. 
Dopo tutto ogni cosa è possibile nel nostro racconto! 

“Spade e streghe" è un filone di questo genere di ambientazione che sostituisce con 
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violenza gli aspetti del magico. In questo genere (esemplificato dalle opere di Robert 
E. Howard e dal suo splendido eroe Conam) il mondo è uno scuro e selvaggio posto 
dove incantesimi e streghe sono reali, e la vostra abilità con la spada è il solo efficace 
vantaggio che avete. 

Pur essendo un’eccellente miniera per il rifacimento di giochi di Adventure, la mancanza 
di malia presente nel mondo di Tolkien è la principale ragione per la mia preferenza 
per le Adventure fiabesco-fantastiche. 

Anche i temi dell'orrore tradizionale sono estremamente popolari. Dracula gioca il 
ruolo della star, in parecchie di queste Adventure. Di nuovo l’immaginazione del 
programmatore è scatenata con una varietà di stimolanti possibilità - persone che 
all'improvviso diventano vampiri, cripte buie ed umide, cunicoli dove l’inaspettato può 
balzare fuori appena voltate l'angolo, limiti di tempo concessivi per fuggire prima che 
vi ritrasformiate in vampiri ecc. Quest’ambiente si presta a situazioni con case vastissi¬ 
me, con un gran numero di stanze in cui ci si può muovere, discese agli inferi per 
affrontare il Diavolo e riscattare la vostra anima, fughe dalle isole dei Voodoo, dove gli 
zombi attaccano ad ogni angolo, lupi mannari, adoratori di Satana ed altri ancora. 
Secondo me questo tipo di ambientazione è il migliore per varietà, quando si deve 
pensare ad un intreccio. 

Un'altro mondo zeppo di possibilità (e così relativamente ignorato dagli scrittori) è quello 
degli eroi delle “comic strip". Superman, Batman ed altri hanno dimostrato da decenni 
di poter suggerire una varietà di temi differenti (ancora gli stessi schemi di base, 
arrangiati in modo differente). 

Alcune rapide idee che vengono alla mente sono: un A-man (ovvero un Adventure- 
man, se non l’avete già intuito!) che insegue il Super-malvagio Bug-man sopra l’intera 
Commodore City, prima che egli riveli la sua identità segreta, un A-man che salva “Luigi 
Left" dal diavolo “Interfaccia” che sta tramando di conquistare il mondo. Sono sicuro 
che questo sia un genere ricco di spunti. 

Ci sono molte altre situazioni che potete utilizzare, come ho detto, l’investigatore che 
scopre il crimine, l'innocente coinvolto nel mondo dello spionaggio, il naufrago sull’isola 
deserta. Dovete solo guardare i programmi della TV, i libri di fantascienza della vostra 
libreria o i film che si proiettano al vostro cinema, per trovare immediate idee per la 
trama. E infine c’è la fantascienza. Ho lasciato per ultima la fantascienza poiché è 
l’ambito che ho scelto per la mia avventura - “Il Pianeta Dell'lncubo". I fans puristi della 
fantascienza potrebbero probabilmente argomentare che II Pianeta Dell'lncubo è più 
una “space opera” che fantascienza, ma per onor di semplicità io considero tutte le 
storie con problematiche di spazio e tempo, come fantascienza. Di nuovo, le possibilità 
sono piuttosto vaste: viaggio nel tempo per salvare il buon Dottore risucchiato nel futuro 
dall’azionamento prematuro della sua macchina del tempo, battaglie contro gli alieni 
che mirano ad invadere la terra, ricerca di un pianeta post-nucleare adatto alla vita 
dopo l’olocausto. È in questo genere di ambientazione generale che ho deciso di situare 
la mia storia. 

Scegliete una ricerca o una meta 

Può sembrare strano rivolgerci a ciò prima di ogni considerazione circa la stessa trama, 
ma poiché l'intera idea di un gioco di Adventure è risolvere un enigma, trovare una 
risposta, raggiungere una meta - C 06 Ì la principale considerazione veramente prioritaria 
deve essere il decidere quale sarà la vostra meta. 
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Quando cominciai la prima volta a lavorare a “Il Pianeta Dell'lncubo", avevo una sola 
meta - liberare la Principessa Aurora. Dal momento che la trama si andava espandendo 
durante la fase programmatoria, ho aggiunto un secondo obiettivo - trovare il cristallo 
energetico, e portarlo allastronave. Questo ha aggiunto difficoltà al gioco ed ha esteso 
l'ampiezza dell Adventure in modo abbastanza considerevole, ma non era in verità una 
parte essenziale della storia originale. Perciò a dispetto dell’importanza dello scegliere 
la vostra meta, è possibile fare revisioni più tardi o, come ho detto, delle aggiunte. 
Non tentate di iniziare, in questa fase, ad aggiungere dettagli troppo particolareggiati. 
Per esempio supponete di aver fissato come meta TROVARE IL TESORO, nel castello 
del Destino. Quando la vostra immaginazione comincia a delineare la trama, potreste 
anche pensare a come aggiungere un punteggio al gioco, sommando 10 punti per ogni 
informazione sul tesoro. Mentre la vostra mente sta pensando a ciò potreste orientarvi 
ad aggiungere il pnncipio di sottrarre punti a causa di varie difficoltà incontrate, e che 
il vostro giocatore non ha superato in un determinato limite di tempo. Da ciò voi potreste 
decidere di aver bisogno di evidenziare (per tutto il tempo) il punteggio sullo schermo - 
in modo da sedervi davanti al 64 ed iniziare a trattare la parte grafica della vostra 
impaginazione del punteggio... 

L’essenza di una buona stesura della trama in questo stadio è la semplicità. I dettagli 
arriveranno più tardi, una volta che avrete iniziato il programma. 


Decidete sul ruolo dell’eroe 

Questo - molto semplicemente - coinvolge il giocatore nello scenario. Dal momento 
che la partecipazione nell’avventura è la chiave per giocare in modo avvincente, avete 
bisogno di far sentire al vostro potenziale giocatore di essere lui l’eroe. 

Avete due opzioni principali ora: 

1. Il vostro giocatore agisce come se esso stesso fosse proiettato nel mondo della 
fantasia. 

2. Il vostro giocatore è rivestito del ruolo di un eroe di fantasia. 

Non penso che importi troppo oliale delle due scegliate - mentre dovrete averlo proprio 
chiaro all’inizio dei gioco. 

Nel mio caso personale ho voluto che l’eroe fosse il pilota di una ammaccata ma 
affidabile astronave (l’ombra di Han il Solitario) che lo ha ridotto a fare la vita del 
trasportatore. 

Scegliete gli altri personaggi 

Naturalmente gli altri personaggi della trama dipenderanno dalla storia che state 
scrivendo, sicché questa fase dovrebbe in realtà essere vista allo stesso tempo come 
creazione vera e propria della storia. 

Ma dato che queste fasi sono un po’ artificiose... (ciò che realmente accade è che 
mentre state pensando alla vostra storia automaticamente penserete anche all’Eroe, 
alla Locazione, al Malvagio ecc.) è più facile se avete alcuni generi di struttura che 
assicurano che non vi siete dimenticati di nulla. 

I personaggi principali devono essere: complici, persone da liberare, marrani, e vari tipi 
per aggiungere colore locale o che agiscano come “pesci pilota” o suggeritori di tracce. 
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Il Pianeta dell'lncubo è piuttosto carente nei personaggi a causa del suo ambiente - 
un pianeta alieno che contiene svariati pericoli piuttosto che personaggi malvagi - così 
che l’unico altro vero personaggio è la Principessa Aurora. 

Un aspetto della stesura di questo tipo di gioco è l’ovvio problema del sesso del 
giocatore. In ogni racconto dove il giocatore rivesta il ruolo di un uomo che tenta di 
liberare una donna, si potrebbe argomentare che il gioco attrarrà solo i maschi, 
specialmente in alcune fasi dell'Intreccio, (ciò apparirà ovvio a chiunque lo abbia già 
giocato!). Nonostante io non abbia fatto ciò, dati gli scopi di questo libro - dovrebbe 
essere questione semplice inserire una domanda all’inizio del gioco per chiedere se il 
giocatore è maschio o femmina. Non appena si riceve l'apposita risposta il gioco 
potrebbe quindi fissare alcune variabili, di modo che la Principessa potrebbe diventare 
un Principe ed il giocatore diventare una Pilota spaziale femmina. Secondo me questo 
aggiunge un elemento di flessibilità ai giochi di Adventure che manca negli altri “media”, 
come libri e film. 

Scrivete una sinossi della storia 

Possono venire idee nei momenti più strani, spesso in bagno, a notte fonda o, nel mio 
caso, sul treno. Mentre sferragliavo da Manchester a Londra, una bigia mattina di 
maggio, l’intera trama mi si presentò in modo pressoché inaspettato e repentino, e la 
scribacchiai giù proprio lì. Questo costituì la sinossi - che è rimasta la stessa nei 
contenuti di base, durante il processo di creazione e programmazione dell'intero gioco. 
La mia sinossi era del tipo seguente: 

Siete il pilota di una astronave in missione per liberare la bella Principessa Aurora sul 
pianeta Zen dove sta per essere maritata al tiranno Ruler. Vi siete innamorati di Aurora 
ma non osate dirglielo. 

Un’improvvisa caduta di potenza o uno stormo di meteore ha provocato la vostra caduta 
su uno strano, inesplorato pianeta. Siete atterrati con successo con la vostra navicella, 
ma siete svenuti durante la caduta. 

Quando rinvenite scoprite che la nave è stata violata dall'esterno e la Principessa 
catturata. Dovete porvi in cammino e liberarla. 

L’atmosfera del pianeta è venefica, sicché siete obbligati ad indossare per prima cosa 
la vostra tuta spaziale, ma lungo la via ve la levate non appena trovate una pianta 
aliena, con strani frutti che (se mangiati) vi permettono di respirare l’aria senza pericolo. 
Attraversate un vasto deserto fino ad una città in rovina, nel vostro girovagare, ma tutto 
ciò che vi trovate è un serpente gigante che vi attacca. 

Arrivate finalmente ad una smisurata foresta e continuate la ricerca. Vi perdete, e dopo 
un po’ di tempo scalate un albero per vedere dove siete. Verso sud vedete salire del 
fumo - vita, o qualcosa del genere. 

Sulla via verso quel posto venite attaccati da un dinosauro (ovviamente il pianeta non 
si è sviluppato ancora molto lungo il cammino dell'evoluzione) e infine trovate un 
villaggio di capanne di fango appartenenti agli indigeni che abitano questa parte del 
pianeta. 

Avete scoperto che Aurora è considerata dagli indigeni come una Dea. Essi vi minaccia¬ 
no quando tentate di portarla via - ed è solo quando la baciate, e dimostrate loro che 
siete il suo compagno destinato, che essi concedono ad entrambi di fuggire. 

Lungo la via del ritorno alla vostra astronave, scoprite che in realtà Aurora vi ha amato 
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per tutto il tempo (ovviamente c era qualcosa di magico nel vostro bacio!!) e volate 
insieme verso un felice futuro, ai margini della Galassia. 

Può non essere elevata letteratura - ma l'essenza della mia storia è tutta qui. Quando 
cominciai a sviluppare il racconto aggiunsi rifiniture e miglioramenti lungo la via - tutto 


1. CITTÀ IN 
ROVINA 


t 



Figura 5.1 Mappa iniziale per il pianeta dell’incubo 
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sommato pochi però. Motta parte del racconto è piuttosto prevedibile ma in un certo 
senso queste aggiungono interesse al gioco. Spesso ci piace “sentire” che il film che 
stiamo vedendo o il libro che stiamo leggendo è “giusto" - in altre parole ci aspettiamo 
che accadano certi eventi in una particolare situazione - e questo accresce la soddisfa¬ 
zione quando scopriamo che ciò infatti è esatto. È questo il motivo per cui ho cercato 
di non essere troppo strano o fuori dal comune. 

Tracciate la mappa iniziale 

Ho già descritto le basi delle mappe in un precedente capitolo - ma in questa fase della 
creazione di una vera Adventure è necessario descrivere ancora un altro tipo di mappa, 
che sarà convertita poi nella forma della griglia descritta nel Capitolo 2. 

Avete bisogno di alcune idee sul legame geografico esistente fra le varie Locazioni 
nella vostra Adventure, che vi aiutino ad evitare di commettere errori nel vostro futuro 
progetto. Trovo che è più semplice se tracciate direttamente una vera mappa di base 
(vedi Figura 5.1) che situi le varie Locazioni in uno “spazio reale”, piuttosto che tentare 
di adattarle all’interno di una griglia. 

A questo stadio considerai un numero di Locazioni abbastanza piccolo (infatti variava 
da 7 a 9 all’inizio) perché sapevo che avrei dovuto aumentare alcune sezioni in modo 
abbastanza considerevole, più tardi. Nella versione finale, sia la città in rovina che la 
foresta, contengono circa 11 Locazioni diverse ciascuna - che mi permettono libertà di 
piazzare oggetti e pericoli dovunque io voglia. 

La cura nel tracciare questa mappa è stata di grande aiuto nello svolgimento della 
storia, quando cominciai a pensare agli oggetti e pericoli che avrei voluto iniziare a 
sistemare in Locazioni specifiche, e quindi mi accorsi che la struttura della mia trama 
si stava espandendo a macchia d’olio. La Figura 5.2 (riportata a pagina seguente) 
mostra l'inizio di ciò e un’analisi deila mia storia potrebbe illustrare come questo mi è 
stato di aiuto. 

Questa mappa può essere ora espressa in forma di tavola (Tavola 5.1) che è un 
eccellente modo di raccogliere le vostre idee in questa fase della progettazione della 
vostra Adventure. 


Tavola 5.1 


LOCAZIONE 1 CITTÀ IN ROVINA 

Pericolo: 


Oggetto: 

LOCAZIONE 2 DESERTO 

Oggetto; 

LOCAZIONE 3 LAGO 

Pericolo: 

LOCAZIONE 5 ASTRONAVE 

Pericolo: 


Oggetto: 


Oggetto: 

LOCAZIONE 6 STRADA 

Pericolo: 

LOCAZIONE 7 PALUDE 

Pericolo: 

LOCAZIONE 8 FIUME 

Oggetto; 

LOCAZIONE 9 VILLAGGIO 

Pericolo: 


Oggetto: 


Serpente 

Fune (da usarsi nella palude) 
Frutta su un arbusto (bisogna 
mangiarli) 

Anguilla 

Atmosfera velenos 
Tuta spaziale (da indossare all’e¬ 
sterno) 

Mitra (per uccidere il serpente e 
il dinosauro) 

Dinosauro 
Sabbie mobili 

Coltello (per uccidere l’anguilla) 
Indigeni ostili 
Principessa Aurora 
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La tavola riportata a pagina precedente ha bisogno di alcune spiegazioni perché nel 
progettare la mappa iniziale avevo anche previsto le difficoltà presenti dell’Adventure. 
Vi do un semplice esempio: 

nella LOCAZIONE 1 (la città in rovina) c'è una fune necessaria per sfuggire alle sabbie 
mobili nella palude (LOCAZIONE 7) più avanti. Ma per prendere la fune dovete prima 
uccidere il serpente - e non potete farlo prima di ricordarvi di prendere la mitra- 


1. CITTA IN 
R OVINA 

( SERPENTE 
GIGANTE J 

FUNE <— 


t 



Figura 5.2 Mappa iniziale per il Pianeta dell'incubo con oggetti e pericoli 
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glietta prima di lasciar^ la LOCAZIONE 5. Una volta raggiunta la LOCAZIONE 9 
(villaggio indigeno) non potete liberare Aurora senza baciarla. Non potete baciare la 
Principessa senza togliervi la tuta, e se lasciate la vostra tuta prima di aver mangiato 
la frutta nella LOCAZIONE 2 (il deserto) allora morirete nell'atmosfera velenosa. 

Dopo aver tracciato la mappa iniziale e aver pensato qualcosa circa la storia, il prossimo 
passo è iniziare a disegnare su tabelle la vostra trama. 


Mettete in tabella la trama 

lo sono anzitutto una persona che ama gli spettacoli visivi. Mi piacciono i film, preferisco 
le storie illustrate alla prosa (ciò significa fumetti!) e quando comincio a scrivere tendo 
a vedere con gli occhi deH'immaginazione il prodotto finito, prima di mettere mano al 
“word processor”. 

Perciò è stato naturale per me cominciare a scrivere la mia trama usando la tecnica 
delle tavole illustrate simile al procedimento di un regista che le usa spesso, nelle fasi 
iniziali, per progettare un film. 

Una tavola è proprio una raccolta di immagini visive che ritraggono la storia in un 
insieme di strisce - un “strip-cartoon” del film in altre parole. Ovviamente lo scrivere 
un programma per computer che fa pesantemente riferimento alla parte scritta non è 
la stessa cosa che riprendere un film d'avventura. Se ho usato un simile principio, allora 
ciò di cui ho bisogno è "vedere" prima quello che il giocatore dovrebbe vedere poi sullo 
schermo del computer. 

Ho bisogno di immaginarmi il tracciato del testo sullo schermo - e di figurarmi alcune 
possibili risposte del mio potenziale giocatore in modo da poter cominciare a pensare 
alla struttura della trama. 

All'inizio questa tecnica può sembrare una perdita di tempo - dopo tutto chi vuole 
occuparsi di scrivere le immaginarie risposte a “COSA POSSO FARE ORA?” su un 
pezzo di carta, quando c'è la tastiera da usare - ma nel mio caso trovo che questa 
parte della costruzione è estremamente valida. 

Presumo che ciò sia dovuto al fatto che sono capace di iniziare a “strizzar-pensieri" 
(una frase che ho preso in prestito da un mio caro amico perché è così adatta a 
descrivere il procedimento). Questo significa che sono obbligato (dal fatto di scrivere 
su carta varie idee e risposte potenziali) a concentrarmi molto più profondamente sulla 
trama e sulle Locazioni. Cominciai a raccogliere idee che potessero essere di aiuto più 
avanti. In breve - stavo realmente pensando alla storia. La Figura 5.3 può spiegare 
quello che intendo. 

La fraseologia della mia prima tavola è un po' troppo vasta per l'ampiezza della memoria 
del 64, ma riassume il senso del gioco. E sebbene l’effettivo vocabolario che verrà 
usato più avanti nel programma sia differente, in questa fase una o due idee che avrei 
potuto usare più tardi, si sono imposte - idee che avrei già potuto usare, ma non ho 
fatto in questa prima fase. 

Un semplice esempio è il “personal robot Proteus" che è sopravvissuto alla caduta e 
che dice sullo schermo “...posso aiutarvi nella ricerca di Aurora." 
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LOCAZIONE: dentro la vostra astronave. 

Vi svegliate con la testa che scoppia, in mezzo ai rottami dell’arredamento della 
vostra cabina. Non appena vi rialzate malfermo sui piedi vi torna improvviso alla 
mente il ricordo della vostra Astronave che, perduto il controllo, vi precipita giù. 

La vostra missione - liberare la bella Principessa Aurora dal pianeta Thoth, dove 
sta per essere maritata al tiranno Zom-Ramok, un essere crudele che vede 
l’unione solo in termini politici. 

Il vostro problema - vi siete innamorati della Principessa e, a sua insaputa, avete 
guidato la vostra navicella nei solitari spazi esterni della Galassia, nel tentativo 
di persuaderla a dimenticare la sua promessa di matrimonio a Zom-Ramok, e a 
fuggire con voi. 

Ma il Fato ha messo il suo zampino nei vostri piani, per cui la vostra astronave 
è stata danneggiata da un improvviso fascio di ioni, e tutto quello che avete 
potuto fare è pilotarla su un pianeta inesplorato, agli estremi limiti della Galassia, 
e tentare di atterrare. 

Ora vi riavete in mezzo alle macerie della vostra malridotta navicella. Vicino a 
voi giace il contenuto del vostro baule, la tuta spaziale, carte galattiche, la vostra 
mitraglietta, ed i segni di un’evidente lotta. Ma Aurora se n’è andata. 

La vostra cabina di guida mostra di essere stata aperta dall'esterno e quindi 
richiusa. La vostra sola fortuna è che Proteus, il vostro personal-Robot, è intatto, 
e può aiutarvi nella ricerca di Aurora. 

COSA POSSIAMO FARE ORA? 

Figura 5.3 Dentro l’astronave 

All’inizio abbozzai l’idea di introdurre un piccolo robot che avrebbe potuto gironzolare 
intorno, dicendo battute comiche o lazzi sullo schermo - la mia prima tavola illustrata. 
Questa idea potrebbe essere modificata e migliorata, per far diventare Victor il robot 
(uno “sprite" nel 64), e farlo scendere giù dall’alto dello schermo in vari momenti del 
gioco. Mi chiedo se avrei mai pensato a Victor se non avessi passato il tempo 
rimuginando e riportando, all’inizio, il contenuto dello schermo. 


LOCAZIONE: Vicino ad un fiume immenso. 

La giungla si dirada e airimprowiso vi trovate sulle rive di un immenso fiume, un 
vasto tratto d’acqua più simile ad un mare, tuttavia rapido di corso oltre i vostri 
piedi, con la velocità di un rovinoso vortice. 

Troppo largo da attraversarsi a nuoto, vi sentite scoraggiati. Essere arrivati così 
lontano solo per sentirvi ora impotenti! 

Attorno a voi vi sono delle rocce e i resti di un’antica era, che sembrano essere 
stati abbandonati da migliaia d’anni. Vi siedete per un istante, guardando fisso 
oltre questo rapido fiume, prima di decidervi a tornare indietro. 

Figura 5.4 Dì fronte ad un Immenso fiume 


62 






LOCAZIONE: Foresta. 

Vagate in una vasta foresta, piena di alberi alti come grattacieli, con tronchi grossi 
come case. 

Dovunque l'aria pullula d’insetti, sfrecciami e balenanti nella luce solare che filtra 
dall’alto. Ogni tanto un piccolo animale fugge dal nascondiglio e attraversa la 
vostra strada, sparendo nella foresta. 

Mentre camminate vi rendete conto di andare sempre più in profondità; per l'aria 
si diffonde un gelo, e la luce svanisce mentre gli alberi si fanno più fitti e vicini 
tra loro. Presto ogni traccia del sentiero sparisce, e dovete lottare attraverso rovi 
e cespugli. 

Vi siete persi. Con un brivido vi rendete conto che non c'è modo di poter ricordare 
per quale via avanzare o tornare indietro. E dietro di voi ci sono strani rumori, 
come se qualcosa di immane vi seguisse lentamente e con sicurezza. 

Figura 5.5 Dentro la foresta 

Questi due quadri, nella Figura 5.4 e Figura 5.5, descrivono proprio delle altre locazioni, 
ancora per mostrarvi come io pianifico il mio racconto. Spero che l'atmosfera del gioco 
possa essere recepita, attraverso la fraseologia di queste tavole, e sebbene non sia 
stato capace di mantenere la stessa lunghezza delle frasi sul 64, penso di aver afferrato 
l'essenza del fascino de “// Pianeta Dell’lncubo". 

LOCAZIONE: Sulle rive di un lago 
COSA POSSIAMO FARE ORA? 

Tuffo 

NON POTETE FARLO... ANCORA! 

COSA POSSIAMO FARE ORA? 

Nuotare 
O.K. 

Avanzate silenziosamente sul filo dell'acqua, vedendo in basso uno scintillante 
oggetto di metallo, sul fondo del lago. È un’altra mitraglietta dell'astronave. 

COSA POSSIAMO FARE ORA? 

Tuffo 
O.K. 

Una mostruosa anguilla gigantesca vi attacca, come apparendo dal nulla. 

COSA POSSIAMO FARE ORA? 

Sparare con la mitraglietta 
IMPOSSIBILE - È troppo bagnata. 

COSA POSSIAMO FARE ORA? 

Uccidere il mostro. 

NON SO COSA SIA MOSTRO’ 

COSA POSSIAMO FARE ORA? 

Uccidere l'anguilla 

Figura 5.6 Alla riva del lago 
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La Figura 5.6 è una delle numerose tavole che ho composto, avanzando nel mio 
racconto - tentando di immaginare di star digitando le risposte appropriate ai messaggi 
del computer. Quando arrivai all'effettiva programmazione di questa sequenza (Capitolo 
12) ero già abbastanza sicuro di quello che volevo - e sebbene abbia cambiato 
dappertutto un po' di idee, ressenza è rimasta nella versione finale de "Il Pianeta 
Del l'incubo 

Sommario 

Questo Capitolo potrebbe aver rappresentato la parte più dura della stesura della vostra 
personale Adventure, e la più frustrante per programmatori smaliziati - non abbiamo 
ancora acceso il computer! 

Ma ho la sensazione che gli appassionati siano persone dotate di immaginazione e 
creatività e possano supporre che una volta che l'idea di un filo conduttore è sviluppata 
nella mente, sia molto difficile sradicarla. Se però ciò non accade allora la sola via di 
salvezza è di riportare i concetti su carta, e solo poi sul computer. 

Spero di aver ben introdotto il reale procedimento di come si traduce quel filo conduttore, 
ed il concetto che ciò che renderà unica e funzionale la vostra Adventure contribuirà 
anche a risparmiare tempo ed evitare stress più tardi. 

Ho speso un po' di tempo su questo perché tutti i libri ed articoli che ho letto finora sulla 
programmazione di Adventure, si concentrano sull'abilità nella programmazione, e 
tendono a sorvolare sulla parte difficile - l’ideazione. 

Un ultimo suggerimento prima che passiate al Capitolo 6 e cominciate a battere sui 
tasti - prendete tempo, nello sviluppare la vostra storia direttamente. Non c’è fretta di 
finire. Il tempo speso ora nel pensare sarà fruttifero per il vostro sforzo finale. 
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CAPITOLO 6 

DEFINIAMO LA SCENA 


I giochi su computer, come ogni altra cosa nella vita, possono aver successo o fallire 
nei primissimi istanti. Noi tutti prendiamo rapide decisioni su persone, luoghi, libri, lavoro, 
ecc. basate sulle prime impressioni - giuste o sbagliate - e così questi primi pochi 
secondi del nostro gioco diventano molto importanti. 

Un buon Gioco dovrà partire con un buon titolo - uno che richiami l'attenzione e la 
mantenga desta. Quando mettete una cassetta nel vostro lettore, aspettate per lunghissi¬ 
mi minuti che la carichi, e se vi si presenta un titolo carente, siete giustamente dispiaciuti. 
E anche se non lo siete - potreste esserlo! Titoli buoni devono avere una parte grafica 
ben scritta (e affascinare al modo giusto) e parole che diano il sapore ed il gusto del 
gioco che sta per iniziare. 

Non c’è nessun bisogno di ammattire per questo, (ho visto alcuni giochi che occupavano 
virtualmente tutta la memoria e la maggior parte dell’abilità del programmatore concen¬ 
trata sul titolo, a scapito del programma stesso). Ma ho pure visto titoli sconcertanti, 
con parole scentrate, battute in modo scorretto, e nessun tentativo di cambiare colori 
o di sistemare qualche grafico qui e là. 

I concetti di partenza 

Nell'ultimo capitolo ho descritto la trama di base della mia storia - ma prima di partire 
a sviluppare ulteriormente l’intreccio sul 64 ho voluto sensibilizzarmi bene sul gioco, 
progettando e programmando un titolo che ho trovato apprezzabile. 

Dato che è possibile creare il proprio set di caratteri mi sono divertito con l’idea di 
disegnare mie proprie lettere per le parole “Il Pianeta Dell’lncubo", ma il tempo e la 
capacità di memoria alla fine me lo ha impedito, sebbene mi fossi molto sforzato nel 
provare varie alternative. Alla fine decisi che avrei preferito un titolo più semplice con 
un'astronave in qualche posto dello schermo, e per valorizzare tutto ciò avrei dovuto 
spostare lo sprite attraverso le parole, preferibilmente con un rumore sibilante. 

Dovrò trattare con lo stesso sprite più avanti, nel Capitolo 8 - per cui ora partiamo con 
il solo titolo. 

N.B. Ho suddiviso il programma in pezzi chiamati moduli, in questa sezione del libro, 
come ho già fatto nella sezione 1, tuttavia qui ci sono pochi posti dove si devono 
tralasciare delle linee nei primo moduli, in modo da rendervi possibile inserire e far 
girare il vostro programma per provarlo. Cosi dato che queste linee mancanti saranno 
aggiunte più tardi, vi raccomando di esser sicuri di seguire attentamente la numerazione, 
altrimenti scriverete delle linee sopra le altre - con un sacco di problemi in fase di prova. 
Ho avuto anche problemi con la memoria, di cui ho raggiunto i limiti in parecchie 
occasioni. Per riguadagnare memoria sono stato obbligato a rinumerare il programma 
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e a limitare il numero di asterischi nelle REM a non più di due. Pensai anche di eliminare 
tutte le REM - ma decisi ciononostante di mantenerle, poiché rendono più facile seguire 
il programma e comprenderlo - specialmente dopo parecchi mesi. 

MODULO 6.1 

1 9oto3 

2 save"@0 : modo.lo 6. 1 <a) " > 8 : ver i f y "modu 1 o 
6.1<a >" > 8 ; stop 

3 rem 
100 rem## 

110 rem Pre-Punte99io 
120 rem## 

130 P rint" a” : Po ke53280,0 : Poke53281,0 
140 Priirtt"S2BB*lsca9l iati in lontano futu 
ro 

150 9oto280 
250 rem## 

260 rem variabili 
270 rem## 

280 c1r:v=53248 :sc=54272 : bs=53280 ; bc=532 
81 

290 P r=0 ; cv=0■sv=0 ; ev=0 : 1 v=0 : dv=0 : es=@ : n 

v=0 : na=0 ; Tip =0 ; fv=0 : rc=0 • y y =0 : hh=0 : hr=0 

300 vo-54296 ; w1=54276 : a 1=54277 :si=54278 : 

w2=54283 : a.2=54284 : s2=54285 

310 i,.i.3=54290 • a3=54291 : s3=54292 

320 r. 1=54273 : 11=54272 : h2=54280 : 12=54279 : 

h3=54287=13=54286 

970 rem## 

980 rem tito1o 
990 rem## 

1000 Pokebs,0 : pokebc,0 : Print"a" ss= 1024 : 
cs=55296 

1010 Poke53272,21 
1020 fori=1to23 

1030 pok ecs+40#ì,4 : P ok ess+40#i,102 
1040 pok ecs+40#i+38,4 : Pokess+40#i+38.102 
1050 nexti 
1060 P r 1 nt " » 

II 

1070 Pr i Tittab<11 > "ittRi 1 p iarista de 11 i n 
cubo " 

1080 P r i nt " WEtla■•/ventura sp az i o-ternP ora 1 
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1090 Pririt." 2 E*»ÌÌMW" 

1100 PririfUiiiOS Si" 

1110 P r i nt " >ÌÌÌiaB 4 E S 

Q" 

1120 P r i nt " HPiilSiBQB " 

1130 P r i nt " HiiilSiiBQB " 

1140 Print l 'HiVl!3&BQBSiia 
1150 Prir.t">»Ì*iBB+B I" 

1160 Prir.t"«»raBSSB 13 

*" 

1170 Prir.t M W»SiaBS£B 13" 

1130 Print"«»ili 33" 

1190 P r i nt ” 

II 

1210 form=Ito1500 
1220 nextm 
50000 rerri### 

Linee 100-150: Il gioco attende alcuni secondi per leggere e inizializzare tutte le variabili 
(specialmente impostando gli sprite) e questo si risolve in una pausa dopo che avete 
battuto RUN. Ho sempre trovato queste pause irritanti e mi domando se tutto sia a 
posto o se abbia commesso qualche sbaglio - sicché ho deciso di usare questi intervalli 
per mostrare una breve sequenza di “titoli di testa". Appena voi battete RUN lo schermo 
si pulisce, diventa completamente nero, e le parole. 

“SCAGLIATI IN LONTANO FUTURO” appaiono. 

La linea 150 contiene un’istruzione GOTO, dal momento che la sezione sarà sistemata 
tra la sequenza del "titoli di testa" e le variabili più avanti. 

Linee 250 320: Queste linee definiscono tutte le variabili. Sembrano essere molte, ma 
per adesso consideriamone solo un po’, dal momento che la maggior parte di esse 
saranno descritte completamente nel Modulo appropriato. (C’è un glossario alla fine di 
questo libro, che contiene tutte le variabili). 

Linea 280: V è l’indirizzo di partenza del Video Chip e ci consente di creare e spostare 
sprite usando la formula V + X (dove X è un numero appropriato). SE è l’indirizzo di 
partenza del Sound Chip. BS è l’indirizzo del colore sul bordo dello schermo e BE è 
l'indirizzo del colore del centro. (La ragione per cui questi non sono usati nella linea 
130 è semplicemente che conviene di più avere qui tutte le variabili del programma). 

Linea 290: Questa linea contiene un numero di variabili riguardanti il gioco a cui mi 
riferirò più tardi. 

Linea 300-320: Queste variabili sono tutte valori riguardanti il suono per le tre voci del 
64, e saranno spiegate più compiutamente nella sezione degli effetti sonori. 

La prossima sezione riguarda il titolo della pagina. Spesso traffico sui grafici con trucchi 
del tipo di rileggere lo schermo (read-out) - specialmente considerando la posizione 
del cursore e gli spazi - e per questa ragione ho incluso una seconda versione del 


67 



Modulo 6.1 che è stata convertita a Standard CT. 

Per quelli di voi meno familian con tutto ciò, sarà più semplice che lo prendano così 
com'è (sembra proprio che io voglia spaventarvi!!). 

Perciò CLS sta per “CLEAR SCREEN" (pulire lo schermo) e CU e CD stanno per 
“CURSOR UP" (cursore su) e “CURSOR DOWN" (cursore giù) rispettivamente. G< e 
G- si nferiscono a "GRAPHIC LEFT" (simbolo grafico a sinistra) e "GRAPHIC RIGHT" 
(simbolo grafico a destra) sicché G< + significa tasto “+” quando il tasto Commodore 
è azionato - e ciò fa risultare l’appropriato simbolo grafico. 

Se osservate la linea 1180 nel Modulo 6.1 (b) ve lo dimostrerò più chiaramente possibile: 

1180 PRINT" 3CR - cursore a destra di tre posizioni - 
GRN - tasto CTRL e tasto del colore verde - 
G<K - grafico sulla sinistra del tasto K - 
3SPE - tre spazi - 

REV - tasto CTLR con REVERSE ON - 
G>K - grafico sulla destra del tasto K - 
OFF - tasto CTRL con REVERSE OFF" 

Quindi se fate riferimento al Modulo 6.1 (b) così come al Modulo 6.1 (a) non dovreste 
avere difficoltà nel battere questa parte. 


MODULO 6.1 (b) 

970 REM** 

980 REM TITOLO 
930 REM** 

'.C00 F'OKEBS ,0 : POKEBC ,0 : PRIMI" CCLR I “:SS = 1024 : C 
8=55236 

1010 POKE53272 ,£1 
1020 FORI=1T023 

1030 POkECS+40*I,4:POKESS+40*1,102 
1040 PGKECS+40*I+38,4:POKESS+40*I+33,102 
1050 FEXTI 

1860 PRINT"CCR3 CPURPLE3CCYAN3CCYAN3CCYANJCCYA 
MICCYAN3CCYANJCCYANJCCYANICCYANJCCYANJCCYAN3t 
CYAN3 CCYAN]CCYANJCCYAN3CCYANICCYAM3CCYANICCYA 
N3CCYANICCYANICCYANICCYAN3CCYAN3CCYANICCYANIC 
CYANJCCYANICCYANICCYANICCYANICCYANICCYANICCYA 
NICCYANJ* 

1070 PRINTTAEv 1 l ; CCD1 CCO3 CCD3CUJHITEIIL PIATE 
TA DELL’INCUBO * 

1330 PE ÌNT"CCR 3 CCRICCO 3 CCD 3AVVENTURA SPAZIO-T 
EMPCRALE” 

13S0 PR!NT•C CD 3 C CD 31CR 3 C CR 3 C CR 3 C CR 3 C CR 3 C GREEN 
I I* 

1«0C PRINT”CCR3 CCRICCR 3 CCR3 CRVS ON3CCYANI CCY 
ANI” 

1110 F’R INT” CCR 1CCRI CCR 3 CCR3 CRVS ONJI+ICRVS 0F 
Fi CREDI»" 

1120 PRINT"CCR3CCR3CCR3CCR3CRVS CN3CGREENII•i 
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1130 PF, IMT" CCR ] [CR 3 CCR 1 CCR 3 CRVs 0N3£GREEN3|•I 

1143 PRINT 11 CCRI£CR 3 CCRI £CRI CRVS 0N3ECYANII•I £ 
CVANICRVS OFF 3 £ PURPLE 3 *" 

1150 PRINT" f CR 3 ICR 3 CCR 3 £ GREEN 1 [RVS Ofi3|+| |" 
1160 PRINT" CC3R3CCR3CCR3ERVS ON3 1CCYAN3 | |£RVS 
OFF 3 CYELLOU3*" 

1 170 PRINT" CCF 3 CCR 3 CCR 3 CGREEN3CRVS ON] | CC.YANI 
i |[RVS OFF 3" 

1180 FRINT" CCRIICRKCRHCRHGREEN3 CRVS ON3 

[RVS OFF 3 " 

1130 FRI NT* CCR 3 ICC 3 3 PURPLE 3 CC -'ANI 1 CYftN 3 £CYftN3 
CCYAN3 CO' 4M] iCVftNI CCYANJECYANI CCYAN3 CCYAN3 CCY 
AH3CCYAN1ÌCYAN3 COVAMICCYAN3 ECYANICCYAN3ICYAN3 
COVAMI CC"- ANI COVAMI CCYftN3 CCYAN3 COVAMI COVAMI CCY 
ANI COVAMICCYftNI COVAMICCYAN3CCYANIECYAN3£CYftN3 
CCYftN3 * 

1210 FORM=ITO 1500 
1220 NEXTM 
50000 REM**» 


Linea 1000-1010: prima puliamo ancora lo schermo, e rimettiamo il bordo ed il centro 
a nero con POKE BS e BC. li motivo per cui lo facciamo ancora è perché nella fase 
successiva del gioco dovremo aver bisogno di ritornare a questa sezione, e così non 
dovremo reinserire il programma tutto dall’inizio. 

Qui sono inizializzate due variabili SS e CS. Esse riguardano la costruzione del modello 
sullo schermo e poiché si riferiscono proprio a questa sezione del titolo, le ho lasciate 
qui per semplicità. SS è l’indirizzo di partenza dello schermo e CS della memoria colore. 

La linea 1010 converte il 64 al modo UPPER-CASE (maiuscole) - non indispensabilmen¬ 
te al primo RUN, ma poiché il testo dell’Adventure è in lettere minuscole (trovo che ciò 
è molto più carino) abbiamo bisogno di questa linea di riconversione nel caso in cui 
dovrete ridare il RUN una seconda o una terza volta. 

Linee 1020-1050: Questa routine sistema con una “POKE" due linee verticali all'estrema 
destra e sinistra dello schermo usando il simbolo grafico con il tasto Commodore ed 
un ’+’ (POKE 102) in color porpora (POKE 4). Ho usato l’istruzione POKE qui perché 
è possibile sistemare il simbolo nell’ultima posizione a destra senza provocare un 
Carriage Return, che causerebbe lo spostamento in su dello schermo di una linea. 

Linee 1060-1090: Semplici istruzioni PRINT che riempiono i bordi orizzontali, superiore 
e inferiore, dello schermo con gli stessi simboli grafici. 

Linee 1070-1180: L’immagine dell’astronave nella parte a sinistra dello schermo con 
tre stelle e le parole del titolo appariranno, una volta che avrete inserito queste linee. 

Linee 1210-1220: infine un breve loop di tempo per mantenere sullo schermo il titolo 
per un po’. Questo loop è un po' corto in questa fase, in modo che quando avremo 
aggiunto lo sprite a questa sequenza, ciò allungherà il tempo in cui il titolo rimane sullo 
schermo. Naturalmente potete facilmente allungarlo (FOR M = 1 TO 3000 per esempio) 
se volete mantenerlo più a lungo. 
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Prova del modulo 6.1 


Se battete RUN lo schermo dovrebbe annerirsi completamente e dopo la sequenza del 
titoli di testa, dovrebbe comparire una scatola attorno al bordo, seguita dalle parole “IL 
PIANETA DELL'INCUBO - AWENTURA SPAZIO-TEMPORALE” nel centro dello 
schermo, un po' sopra la metà. Alla fine un'astronave grigia dovrebbe apparire per poi 
scendere nell’angolo in basso a sinistra. 

Iniziano nuovi argomenti 

Se guardate la Figura 5.3 nel Capitolo 5 vedrete come ho progettato il mio schermo di 
apertura, nella sezione in cui disegno la trama. Questo secondo Modulo è il risultato di 
questo disegno. 

Ho spesso avuto la sensazione che gli appassionati di Adventure hanno bisogno di un 
tocco di drammaticità, per sentirsi veramente dentro al mondo deH’immaginaria storia 
(i giochi di Scott Adams che ho visto mancano completamente di questo) quindi, dopo 
aver impostato il mio titolo, ho voluto una pagina di testo per spiegare quale sarebbe 
stato lo scenario e cosa sarebbe seguito. 

Scrivere il testo per il Computer non è facile. Ho dovuto scrivere tutto direttamente, 
innanzittutto per aver un buon equilibrio, se mi fosse capitato di cambiare le parole sullo 
schermo. Mi sono alla fine deciso per uno sfondo marrone con lettere nere, per dare 
una sensazione di dramma. Infine ho dovuto riarrangiare il testo in modo che le parole 
fossero posizionate esattamente come volevo. 

Il problema dei colori è uno di quelli che risolverete solamente giocando con diversi 
bordi e lettere colorate, provando le varie combinazioni finché non siete soddisfatti. Di 
nuovo credo che il tempo speso qui nell’aggiungere qualcosa di extra sia buona cosa, 
perché dà una sensazione globale di professionalità. 


MODULO 6.2 

1 9ot-0 3 

2 save 11 @0modu. 1 oG. 2 ".. 8 : ver i f y " modo. 1 ob. 2 " .• 
8 : stop 

3 rem 
1270 rem## 

1280 rem scrittura 
1290 rem## 

1300 P ok ebs.. 9 : P ok ebc ■ 9 

1318 P r i ritchrt (. 147 > : rem P u 1 i sce schermo 

1320 form=lto200 

1330 nextm 

1340 P ok e53272 >23 

1350 P rinttab< 6 >" SS iete so1 1 ne11 a sa1a 
di controIlo dell"astronave "; 

1360 Print"Pensando alla ragazza che ave 
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te trasportato a. P a9a.ro ento" 

1370 pr i nt"Msu. 1 Pianeta. Zen : la Pri ncipe 
ssa che ha segretamente rubato "; 

1330 print"il vostro cuore.- ma che e" pr 
omessa al tiranno di Zen"; 

1390 Print" in matrimonio Politico" 

1400 Printta.b<5>"Stia, voi siete solo Preo 
ccu.Pati di Aurora.- non della vostra 
1410 Print"abi 1 ita/" di Piiota. A11 "imPro 
wiso e senza nessun segnale " .- 
1420 Print"vi dirigete verso lo spazio R 
eale troppo vicini ad un misterioso 
1430 Print"Pianeta - e siete risucchiati 
dalla gravita"." 

1440 Printtabe5)"SForse la vostra mente 
non e"" concentrata - 

1450 Print "Forse il Pianeta e"' troppo fo 
rte. Non c"e" modo di controllare 
1460 Print"la vostra astronave. Mentre 1 
"ultimo ricordi e"' la terra "; 

1470 Print "che s - " avvicina velocissima... 

li 

• m 

2100 Printtabe 11 > "SF'reroi ’"s"' Per iniziar 

_ li 
f 

2110 geta$:ifa$C> "s"then2110 


Linee 1300-1340: Prima che il testo appaia è necessario cambiare il colore in marrone, 
pulire lo schermo (PRINTCHAR (147) è un modo alternativo a PRINT CIS) e impostare 
un piccolo loop. Infine la linea 1340 imposta il testo a LOWER CASE (minuscolo). 

Linee 1350-1470: Banali linee di testo - introducetele con cura, con un occhio alle 
spaziature. I noiosi simboli grafici che appaiono sono dovuti al fatto che le frasi iniziano 
tutte con lettere maiuscole. 

Linee 2100-2110: Avendo impostato il testo abbiamo bisogno di mantenerlo sullo 
schermo abbastanza a lungo perché chiunque sia in grado di leggerlo - allora che cosa 
c’è di meglio che avere una linea con un messaggio “BATTI S PER INIZIARE”? La 
linea 2110 è un metodo standard di mantenere un'istruzione PRINT sullo schermo 
finché l’utilizzatore vuol continuare. 


Prova del modulo 6.2 

Se ora date il RUN ai due Moduli- assieme, troverete che lo schermo cambia ad un 
delizioso marrone, ed il testo sarà spaziato con regolarità sull’intera area. Non ci 
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dovrebbero essere parole spezzate, se avete ben controllato le spaziature sul vostro 
listato. 

Adesso premete S: il programma si interrompe con il messaggio READY. 

Consigli generali sulla scrittura del testo 

Dato che molto dello spazio disponibile per un gioco di Adventure viene preso dal testo, 
spenderò un po di tempo per darvi qualche suggerimento che ho sviluppato scrivendo 
"Il Pianeta Dell'lncubo”. 

Il problema più grosso (come avrete già scoperto) è la spaziatura corretta delle parole 
sullo schermo. Il modo che ho usato per farlo è stato di scrivere due o tre istruzioni 
PRINT allo stesso tempo, e quindi vedere come apparivano sullo schermo. 

Per esempio io scriverei le Linee 1350-1370 e quindi in maniera diretta batterei GOTO 
1350. Le poche linee apparirebbero, dandomi un'idea di dove ho bisogno di aggiungere 
o togliere spazi per rendere il testo più nitido. Dopo di ciò, aggiungendo LIST 1350- 
1370 (ancora in modo diretto) posso giocare con le linee mentre sono ancora evidenziate 
sullo schermo. Infatti se voi battete l’istruzione GOTO nella linea più alta dovete battere 
solo HOME per avere il cursore in alto a sinistra, e quindi battere RETURN per avere 
l’immediato messaggio. 

Più avanti nel programma troverete delle istruzioni PRINT con GOTO e GOSUB insieme 
sulla stessa linea, e ho trovato più facile aggiungere un simile messaggio di errore: 

es... HOME.“; GOTO 3300 (notate il punto e virgola) 

invece di 

...HOME.": GOTO 3300 

Usando il punto e virgola invece dei due punti, faccio in modo che il 64 blocchi il 
programma con il messaggio SINTAX ERROR, e non esegua le istruzioni GOTO e 
GOSUB - che era esattamente ciò che volevo quando ho scritto il testo. 

Sommario 

Questo Capitolo ci ha messo sulla strada del programma. È abbastanza facile finora, 
ma spero che siate d’accordo con me che l’atmosfera della storia può già essere 
recepita nella pagina del titolo e nel testo. 

Naturalmente la vostra Adventure può essere semplice o complessa, a vostro piacere. 
Qualcuno potrebbe risparmiare sul titolo a vantaggio del programma stesso. Altri 
potrebbero indulgere in una grafica migliore. Ogni programmatore è diverso. La mia 
intenzione in questo capitolo è di introdurvi nella programmazione di testi e darvi alcune 
idee di come si presentano. Il resto è, come sempre, compito vostro. 
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CAPITOLO 7 

SERVE AIUTO? 


Proprio per completare alcune parti essenziali del gioco prima di muoverci tra le righe 
della storia attuale, mi occuperò in questo capitolo di “Istruzioni Generali" e dei moduli 
per fare SAVE e LOAD su nastro, e dell'aggiunta di sprite e suono nel prossimo. 

La ragione per cui faccio ciò è perché questi moduli costituiranno delle subroutines di 
notevole valore che potrete mettere nel vostro programma man mano che proseguirete - 
il che è molto più veloce che il tornare indietro dopo aver programmato la storia 
principale, per poi continuare ad aggiungerli nei posti opportuni. 

Inoltre la possibilità di salvare e di caricare vi renderà la vita molto più facile, quando 
inizierete la storia principale, poiché potrete salvare il gioco e poi ricaricarlo nuovamente 
molte volte, dopo che avrete testato delle particolari linee. Ciò risulta molto più veloce 
che il dover provare il gioco per ogni Locazione ogni volta che volete testare una 
particolare routine. 

Se proprio vi occorre aiuto! 

Quando ho programmato il “Pianeta dell'Incubo ", per circa un mese ho chiesto ad 
alcuni amici di fare delle prove - il modo migliore per scoprire gli errori! Li ho fatti sedere 
di fronte al computer, ed ho osservato, foglio e penna a portata di mano per annotarmi 
in fretta gli errori. Ciò che più di tutto mi ha sorpreso, comunque, è stata la loro 
mancanza di conoscenza elementare nel condurre un gioco di Adventure. Ora, mentre 
voi ed io conosciamo le regole e le consuetudini di un gioco di Adventure — nessun 
altro è in grado di saperle. Quindi il buon programmatore fornirà una o due pagine di 
istruzioni per favorire il novizio nei giochi di Adventure. 


MODULO 7.1 


1 90t0 

.^i 





2 save" 

@0 rn od u 1 o7 

. 1 

II 

t 

8 : veri 

fa"modulo?.1", 

8■stop 






3 rem 






2270 Pr 

\ : " 

ir.t"iEE*H 

Vo 

le 

•te ist 

■ru. zi orni <s o ri 

2289 9e 

taf : ifafC 

■*. il 

i* 

arida $< 

>"r."theri2280 

2290 if 

af="s"the 

r.P 

ok 

evo .■ 0 • 

90SU.b 15000 

14970 r 

e m** 



l 


14980 i 

stru.z 1 ori i 
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14990 rem## 

15000 P r i nt " Si" : P ok ebs ; 11 : P ok ebc , 11 : P r i ri t 
tab < 13 > ” 3^ ai struz i ori ì *F a 
15010 Print"J*MiEntrate nel mondo della 
fantasia e avventura. " : 

15020 Print" col vostro computer come 9u 
ida. Per superare"; 

15030 Print" Questa avventura dovete dar 
e i comandi - in italiano - 
15040 Print "sempre un &.yerboli e Gualche 
volta un nome. 

15050 Print "Per es : - rendi mitrali o *1 
scala albero 

15060 P r i nt " SiCfv'ì verrà/’ data una. descri 
zione del luo9o in cui siete 
15070 Print "e delle direzioni in cui Pot¬ 
ete andare. Potete usare solo" 

15080 Print" vai «nordli, «sudli.- «estli o 
ovest. 

15090 Print"SIP volte Potete incontrare 
un o99etto che Potreste usare 
15100 Print "Piu'' tardi durante il 9ioco; 
p otete racco91ier1o con "; 

15110 Print"la Parola «'Prendi'li o W aff¬ 
erra Potete usarlo Per 
15120 Print "«'Prendi li la vostra tuta o 
•'■portare'” la Princ ipes sa indietro. 

15130 Printtab<8)"SSEFremi un tasto Per 
cominciare 

15140 9eta$ :ifa$=""then15140 
15150 Print "laiPotete anche «'butta li o 
to9 1 i ■' un o99etto in o9ni momento 
15160 Print "ed esso rimarrà.” nel luo9o f 
inche ” non lo riprenderete " ; 

15170 Print"Quando ne avrete bisogno anc 
ora. 

15180 P r i nt " SlfTast i sP ec i a 1 i r i sP arm i era 
nno tempo : Per es : - 

15190 Print"«»ÌIBna Se a Ssd Ito Ib i 9 

nificano "; 

15200 Pr int "etnordiL «4est!i.. otsudli o ofoves 

t. 
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15210 Print"»Wai S Efcyi dara" un Sii nventa 
rio degl i oggetti che raccogl iete. 

15220 PrinfWWSl 3 significa Guardali in 
torno." 

15230 Primt"liPWa'iS tìs i 9n i fica Siche voi et 
e aiuto!! 

15240 Print." liElfcattete «(istruzionili Per 
avere informazioni genera1i. 

15250 Print" iiSe volete fare salvare il 9 
ioco battete salva 

15260 PrinflISe volete fare finire il 9i 

oco battete esci 

15270 Pr infilo «Jf i neli. " 

15280 Printtab<8)"32EFremi un tasto 
15290 9eta* ; ifa$=""then 15290 
15300 Print" ISUsate solo lettere senza S 
shitf 1 

15310 Print"in altre Parole battete S&a.Si 
urora non BASurora. 

15320 Print"(notate la Sali .• non i3f!ED. 

15330 P r i nt " aSu99er i rnent i : " : P r i nt " ai. Fe 
rmatevi spesso Per fare salva" 

15340 Print"2. Tracciate una «frappali meri 
tre esplorate il Pianeta. 

15350 Print"3. Siate Precisi nell" «linve 
ntario Potendo Prendere solo"; 

15360 Print" Pochi oggetti alla volta. 
15370 Print"4. Se volete aiuto battete r A 
esamina Per vedere gli oggetti. 

15380 Print"5.Ricordate di battere «(istr¬ 
uzioni se rivolete questi messaggi." 
15400 Print"ICWEuona fortuna Per la rie 
erca di Aurora"; 

15410 Print"e fate attenzione a.9li alien 
i ! ! _ 

15420 Print"SSmiMBatti 'L ' Per tornar 
e a1 9ioco 

ì 5430 9et i $■ ■ i f i $0 " 1 " then 15430 
15448 ìfif="1"thenPrint" S" : return 
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Linee 2270-2290: Non appena le pagine di titolo sono terminate ed il giocatore ha 
premuto S per iniziare il gioco, seguiranno due ulteriori suggerimenti prima di entrare 
nel merito del gioco II primo di questi concerne il caricamento da nastro ed il secondo 
è mostrato sullo schermo dalle Linee 2270-2290. In poche parole si chiede al giocatore 
se desidera avere “istruzioni La Linea 2290 è resa operativa se la risposta è S. 
mandando il programma alla subroutine a 15000. (La istruzione POKE VO,0 in questa 
linea sopprime il suono come riferirò nel Capitolo 8). Se la risposta è N il programma 
passa automaticamente alla sessione successiva. 

Linee 14970-15410: Questa è l'intera subroutine. Sullo schermo appaiono tre pagine 
separate di istruzioni, ciascuna di esse scorrerà premendo un tasto qualsiasi del 64 
(Linee 15140 e 15280). Non c'è molto da dire qui. L'unico problema che potete avere 
è quello di interpretare i vari colori ed i tasti reverse on/off, dato che ho illuminato parole 
e frasi cambiando il colore in tutto il testo. Ciò inoltre mette in risalto l’aspetto delle 
pagine, conferendo loro una piacevole presentazione e composizione. 

I colori base che ho usato sono il verde per il testo principale, il blu (il tasto Commodore 
più il tasto 7, non il tasto Control più 7) per le parole chiave, bianco per le linee “PREMI 
IL TASTO" e nero per l’intestazione “ISTRUZIONI ”. 

Una volta ancora: quando battete il testo scrivete solo un paio di linee per volta, poi 
battete GOTO al numero di linea per controllare la spaziatura. 

Linee 15420-15440: Notate che questa volta ho dichiarato “PREMI L PER RITORNARE 
AL GIOCO" invece di semplicemente PREMI UN TASTO. La ragione di ciò sta nel fatto 
che se il giocatore è nel mezzo della trama e chiama questa subroutine quando fa 
RETURN al gioco, ha bisogno di avere il programma evidenziato nella posizione in 
corso, per ricordargli a che punto è. 

Più tardi programmeremo “G" o “GUARDA” che sarà il corretto suggerimento per 
permettere alla Locazione corrente di essere evidenziata. Perciò ci occorre lo stesso 
suggerimento qui. 

(Se non capite ciò ora - non preoccupatevi - Vi sarà più chiaro in seguito quando 
programmerete i comandi I). 

prova del Modulo 7.1 

Se ora fate il RUN del programma, dovreste trovare che dopo l'introduzione alla storia 
su uno schermo marrone - lo schermo diventa grigio non appena premete S, e appare 
quindi la prima pagina di istruzioni. Se non premete S per iniziare, ma un qualsiasi altro 
tasto, allora lo schermo rimarrà marrone. (Provate per controllare - non prendete le 
mie parole alla lettera!) Dovreste riuscire a esaminare tre pagine di istruzioni prima che 
il programma finisca. Se fate scorrere queste tre pagine e poi premete un altro tasto 
esattamente alla fine, il programma tornerà all'inizio delle tre pagine e le ripercorrerà di 
nuovo. Se continuate a premere un tasto alla seconda esecuzione, il programma abortirà 
con un messaggio di errore RETURN WITHOUT GOSUB - che potrebbe confondervi. 
La spiegazione è che alla prima esecuzione il programma disporrà il RETURN nella 
Linea 15440 e tornerà alla 14970 perché è da qui che è partita. Alla seconda esecuzione, 
poiché non ha avuto il comando GOSUB nella Linea 2290, abortisce. 
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Caricamento e salvataggio 

Non c’è dubbio che i giochi di Adventure devono avere la possibilità di fare il SAVE di 
una sessione su nastro. A parte il fatto dell uso ovvio di immagazzinare il gioco se non 
avete più tempo, è anche comodo salvare il gioco quando raggiungete un punto critico 
dove potreste soccombere - e fare SAVE a questo punto vi metterà in grado di 
ricominciare senza dover ripercorrere tutta la Adventure. 

Il modulo seguente vi permetterà di fare sia il SAVE che il LOAD. 

MODULO 7.2 

1 9oto 3 

2 save " @0nodu. 1 c<7 .2 "8 '■ ver i f y " modu 1 o?. 2 " .• 

8 : stop 

3 rem 

2240 PrinfEEEMiiVolete caricare uri 9ioc 
o da nastro ? (s o n) : 11 
2250 9et a# : ifa#0"s"andato"n"then2250 
2260 if a$="s"thenPokevo,0 : 9osub16000 
15970 rem** 

15980 rem c arica 
15990 rem** 

16000 Print." Etili nserisci il nastro e ria 
VVOl9i ; 

16010 i nP ut " Eatt i RETURN 3 : " ; '1 $ 

16020 oP en 1 ■ 1 ,i 0 .■ " P1 sTict 11 
16030 i nP ut# 1.. P r . cv.. sv .• ev.. es .• 4 v.. dv > nv ^ f v 
16040 Ì TiP Ut# 1 .. Z .• fi# .• m .« Ì > P > Ti .' 0 J S .■ i.'J > 1 #.' P 1 .' s 
P 

16050 i nP ut# 1 > ve# .■ no# .■ 9 > P 2 .■ nP .• na ■ re .■ y y ■ h 
hhr 

16060 f or i -11 o9 '• i nP ut# 1 .■ ob't! ( i "> '■ next i 
16070 f or i = 1 to9 • i nP ut# 1 .• ob# '■ i > '■ next i 
16080 f or 1 = 1 to9 : i nP ut# 1.. s i # '■ i > : next i 
16090 closel 
16100 9o s i j. b35420 

16110 P r i nt " SI" : P ok ebs.. 11 ; F' ok ebe .■ 11 ; 9oto4 
020 

16970 rem** 

16980 rem salva 
16990 rem** 

17000 print"SEElSiSiete sicuri di voler sa 
lvare" : P rinttab<15 >"il vostro 9 1 eco? 

17010 Pririt" Streme te TftaS o “SnS 1 " 
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17020 9et 3.t i f.3.*<> " s " andato " n " then 17020 
17030 ì fa i~ " n " thè nP r i nt 11 SJ" : 9oto4@2Q 
17040 ir,Pu.t"Zlletti il nastro e pr*mi 3F'E 
TURNa "qt: r tachrta3) 

17050 oPenl ,1,1, "Planet" 

1 7060 P r i nt# 1, P r ; rt cv ; rts yrt, ev ; r$ ; es 
; rt 1q vi r idv .• ri, nv; r i ; f 
17070 P r i nt# 1 , z, ri ; ni ; r i, rn ; r i ; ir i, p ; r i, 
n, ri, e, ri, s; ri ; w ; r i, i iri j p i ; ri, sp 
17080 P r ì nt# 1 , vei ; ri ; noi ; ri ; 9 ri ; p 2 ; ri ; n 
P .■ r i > na ; ri ; re, ri J yy, ri, hh , ri.; hr 
17090 for i = 1 to9 ' P r i nt# 1 , ob’i ( i > : next i 
17100 t" or i = 1 to9 : P r i nt# 1 , obi ( i > : next i 
17110 f or i = 1to9 : P ri nt# 1,sii(i):nexti 
17120 closel 
17130 9osub35420 
17140 P rint" : 9oto4020 


Linee 2240-2260: Una pura e semplice routine che permette al giocatore di andare alla 
subroutine di caricamento. 

Linee 1600-1610: Se premete SAVE per attivare questa sobroutine, allora lo schermo 
sparirà e apparirà l’istruzione “METTI IL NASTRO NEL REGISTRATORE E RIAVVOL¬ 
GI:” seguito da “PREMI RETURN”. Queste due linee fanno ciò. Lo strano geroglifico 
nella Linea 1610 è un RETURN in modo shiftato. 

Linea 16020: Questa Linea fa una OPEN di un file su una cassetta (il che significa che 
permetterà ai dati che avete creato nel programma di essere registrati su una cassetta). 
La terza cifra (0) in questa linea è chiamata “indirizzo secondario” e tutto ciò che fa è 
di dire alla cassetta di “scrivere” i dati. Infine daremo al file il nome di “PIANETA”. 
Quando ho iniziato a giocare con le Adventure ho pensato che la cassetta avrebbe 
immagazzinato il mio gioco in modo sequenziale, come se il computer avesse tenuto 
una registrazione del mio viaggio, e avesse quindi scritto tutte queste informazioni sulla 
cassetta come parte integrante della storia stessa. Il che significa che se avessi passato 
due ore a giocare, avrebbe dovuto immagazzinare il doppio di informazioni che se 
avessi giocato un'ora. 

Ciò che effettivamente succede è molto più semplice - e molto più ovvio. Tutto ciò che 
il 64 deve registrare è il valore di tutte le variabili nel programma, quindi ricaricando 
questi dati sembrerà che si riprenda dalla stessa posizione che si era lasciata. In tal 
modo avrete registrato un “file” di dati fatti con i valori di tutte le variabili di cui 
discuteremo più avanti nel libro. 

Linee 16030-16050: Queste tre linee memorizzano semplicemente tutte le variabili che 
cambiano mentre state adoperando il nastro con il comando INPUT . È molto importan¬ 
te mantenerle nello stesso ordine del mio, poiché occorre fare il SAVE ed il READ dei 
dati nello stesso esatto ordine, altrimenti il 64 abortirà il processo. 


78 




Linee 16060-16090: Infine scriveremo tutti i dati dai vettori relativi agli oggetti (come 
nel programma “Gioco d’Adventure” della prima sezione del libro). L'ultima linea fa una 
CLOSE del file. 

Linea 16100: Questa linea si riferisce agli sprite che tratterò nel prossimo Capitolo, ma 
poiché il principio di come stabilite un caricamento e salvate una routine è importante, 
vi darò dei cenni qui. Quando caricate dati per sprite, viene utilizzato il buffer della 
cassetta (in altre parole il pezzo di memoria che il 64 usa come store temporaneo, 
mentre la cassetta registra o fa un caricamento di dati). In tal modo dopo aver eseguito 
una routine di SAVE o di LOAD, possiamo ricreare i dati dello sprite nella subroutine 
35420 prima di tornare al programma principale. 

Linea 16110: Se il giocatore ha caricato un programma per un gioco precedente, gli 
occorrerà caricare il gioco in modo che lo schermo mostri la posizione corrente (che 
non sarà quella iniziale). Per questa ragione alla subroutine servirà un GOTO e non un 
RETURN o qualcos’altro, il che la rimanderebbe all’inizio della storia. Questa Linea 
fornisce la procedura corretta, anche se a questo punto del programma non avrà effetto, 
poiché non avete immesso ancora la Linea 4020. Essa imposta inoltre il corretto colore 
dello schermo. 

Linee 17000-17040: Prima di permettere alla subroutine di SAVE di cominciare, c’è un 
messaggio di sicurezza “SEI SICURO” nella Linea 17050, PRINT# è usato invece di 
INPUT#, e (questo è molto importante) R$ (che è uguale ad un ritorno carrello ed è 
impostato nella Linea 17040) è messo tra ogni variabile. La ragione di ciò è che il 64 
ha scarsa specializzazione al salvataggio di dati e necessita di queste suddivisioni tra 
ogni variabile. 

Notate che l’ordine delle variabili è lo stesso delle Linee 16030-16080. 

Linee 17130-17140: Infine cancelliamo il buffer della cassetta e ridefiniamo i dati dello 
sprite come prima, cancelliamo lo schermo, e poi facciamo un GOTO dell’area del 
programma che abbiamo deciso di salvare. Ciò è necessario nel caso vogliate fare il 
SAVE del programma e poi continuare a giocare. 

Prova del Modulo 7.2. 

Naturalmente a questo punto del programma non c’è niente da caricare e niente da 
salvare - ma se fate RUN troverete che dopo aver impostato il messaggio “PREMI S 
PER INIZIARE” otterrete un altro suggerimento - “VOLETE CARICARE UN GIOCO 
ESISTENTE DAL NASTRO (S o N)”. Premendo N dovreste ora ottenere il messaggio 
“ISTRUZIONI” del Modulo 7.1, mentre invece premendo S entrerete nella routine di 
caricamento. 

Lo schermo diventerà nero, e vi sarà richiesto di caricare un nastro nella cassetta e 
premere RETURN. Facendo ciò (naturalmente non dovrete avere noie col nastro) 
dovreste ottenere una risposta PRESS PLAY ON TAPE. L’ordine “Run/Stop” vi porterà 
fuori dal programma. Se ciò non succede, vuol dire che c’è qualcosa di sbagliato edio 
suggerisco di controllare attentamente di aver battuto i numeri giusti dopo il comando 
OPEN nelle Linee 16020 e 17050. Quando farete effettivamente LOAD e SAVE vedrete 
che lo schermo lampeggerà e le parole che avete battuto appariranno per un breve 
momento. Questa è una ìdiosincrasfa del 64 ed è meglio ignorarla. Comunque, non 
preoccupatevi. 
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Sommario 


L'accuratezza e l'offerta adeguata di istruzioni è un elemento importante per ogni 
software - spesso carente anche nei packages più cari in circolazione. La difficoltà sta 
nello scrivere abbastanza senza occupare troppa memoria. Nel “Pianeta dell'lncubó’ 
ho fornito il massimo, in seguito alle reazioni delle persone che non conoscevano nulla 
di Adventure - un eccellente pubblico per il vostro gioco. Potreste forse preferire di 
essere più economi, o almeno di omettere quest’area, nel caso che il gioco venga usato 
unicamente da voi e qualche altro vostro amico. 

Comunque, ritornando al gioco dopo qualche anno, troverete che non potete ricordare 
così facilmente fatti che sembravano senza ombra di dubbio ovvi a quel tempo: la 
memoria è labile. Un tipo qualsiasi di guida è in queste circostanze di inestimabile 
valore. 

Il prossimo passo è quello di fornire il suono e grafici - per aggiungere il tocco finale 
prima di iniziare la storia vera e propria. 
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CAPITOLO 8 

SPRITE ED EFFETTI SONORI 


Sebbene abbia affermato che preferisco giocare Adventure basate solo su testi, era 
abbastanza ovvio che se avessi aggiunto grafici ed effetti sonori si sarebbe ottenuto un 
miglioramento in finezza. Ovviamente non c’è abbastanza memoria nel 64 per permetter¬ 
mi di creare un’intera Adventure con disegni e colonne sonore, ma un po' di programma¬ 
zione può portare molto lontano grazie alla disponibilità di due facility del 64: 

1 Sprite 

- 2 Un chip sonoro con tre 'voci’. 

Non c’è spazio in un libro di queste dimensioni per indugiare a lungo su sprite e 
programmazione del suono, perciò ho voluto descrivere come ho ottenuto gli effetti che 
ho usato nel Pianeta dell’Incubo’, e credo che anche voi farete ciò che ho fatto io - 
leggetevi come utilizzare queste facilitazioni nel Reference Guide, se non avete familiari¬ 
tà con essi. 

Creazione dello sprite 

Che cos’è esattamente uno sprite? lo lo intendo come un gruppo di “pixel” programmabi¬ 
li, piuttosto che un maxi-carattere definibile dall’utente. In altre parole usando poche 
istruzioni DATA potete creare un oggetto di alta risoluzione che si muoverà sullo 
schermo (senza tutte le ammucchiate di POKE e PEEK che di solito accompagnano i 
grafici, e senza far uso di POKE di spazi bianchi per muoverli). 

Il Reference Guide del Commodore riassume tutto ciò quando dice... (e cito tra 
virgolette) : 

“tutto quello che dovete fare è dire ’a cosa deve somigliare' ’di che colore deve essere’ 
e 'come deve apparire’ uno sprite. Il chip del Vic-ll farà il resto!”. 

Per creare uno sprite è necessario per prima cosa sapere a cosa deve somigliare. Ci 
sono diversi modi di arrivare a ciò ma il più facile è di disegnarlo su una griglia di 21 x 
24 come nell’User Manual. Nella Figura 8.1 ho preso una copia di questa griglia e l’ho 
riportata quattro volte per aver modo di esercitarmi con disegni differenti. 

Diamo un'occhiata allo sviluppo di uno dei miei sprite, Victor, dal concepimento al 
completamento. 

Se vi ricordate, desideravo che un Personal Robot (che nasceva con il nome di Proteus 
ma ad un certo punto del cammino è diventato Victor) apparisse qualche volta nella 
storia con un messaggio per il giocatore. Uno sprite sembrava la soluzione ideale - ma 
dovevo disegnarlo. La Figura 8.2 mostra i vari disegni partendo da un paio di schizzi 
grossolani che ho tentato in seguito di adattare alla mia griglia 24 x 21. Ciò risultò 
essere più arduo di quanto pensassi inizialmente - poiché avevo la tendenza a provare 
con curve e cose del genere - ma al terzo tentativo questi cominciò a prendere forma. 
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Figura 8.1 Griglia per progettare sprites 

La tappa successiva è di convertire la vostra griglia in istruzioni DATA. Potete fare 
ciò manualmente (questo spesso seccante compito è adeguatamente descritto nel 
Reference Manual) ma ho pensato che sarebbe stato meglio trovare un programma 
che facesse ciò per me, ed ho finito per usare un programma di Sprite Editor scritto da 
A.R. Bennet che ho trovato in una recente copia del Personal Computer World'. Potete 
anche comprare degli Sprite Editors già pronti (anche il Simon’s BASIC ne contiene 
uno) ma assicuratevi di prenderne uno che vi permetta di stampare i vostri dati una 
volta che avete disegnato lo sprite sullo schermo. 

Sono quasi certo che tutti funzionino con gli stessi principi, permettendovi sia di tener 
fermi i vostri pixel sullo schermo, sia di cancellarli, così potete manipolarli fino a che ne 
avete voglia. Lo Sprite Editor che ho usato io aveva pure la possibilità di espandere lo 
sprite orizzontalmente e verticalmente prima di salvare i dati, così potevo realmente 
vedere che aspetto avrebbe assunto. 
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Figura 8.2 Progetto di Victor 















Il movimento dello Sprite. 

Dopo aver disegnato Victor ed aver determinato i dati per crearlo sullo schermo, ho 
deciso di eseguire un piccolo programma di test per provarne il movimento prima di 
insenre tutte le linee nel programma d’Adventure. Ciò ha il vantaggio di vedere se i 
colori dello sfondo, i colori dello sprite e la grandezza necessitano di correzioni prima 
di inserire l'intero programma, e dà anche un’idea della manipolazione dello sprite. 
Forse il più grosso problema che ho incontrato con gli sprite è stato la loro capacità di 
attrazione. Dopo aver trovato che potevo creare una figura con relativa facilità e poi 
iniziare a muoverla su tutto lo spazio (con effetti tridimensionali, collisioni, ecc.) mi è 
passata rapidamente per la testa una grande quantità di idee, ed è stato straordinaria¬ 
mente duro soffocare la mia immaginazione, e concentrarmi con tenacia solo su 
un’immagine - l’utile robot servitore che appare nei momenti di tensione, oppure di 
comicità, lungo tutto il programma. Il 64 rende certamente la vita facile, e giunge a 
effetti di alto livello professionale. 

La prima cosa che vi occorre fare è accendere lo sprite’ o abilitarlo’, altrimenti sebbene 
lo sprite possa essere in memoria voi non potete vederlo. Il Programma 8.1 è un 
semplice esempio. 


Programma 8.1. Sprlteman 


1 9oto3 

2 save " @0 : sF r i ternari ”.. 8 : ver i fy " sP r i ternari 11 
,8 : stop 

3 rem 

? rem*****#^#****#**** 

8 rem inizia1izzazione 

9 rem###########*##*#### 

10 vc-53248 : rem locazione video chip 
15 Print"S8" 

17 rem*»^***#******** 

18 rem creazione di sPrite 

19 rernam**^*^.**^* 

20 P ok e ve+21 .■ 128 : rem 1 i ve 11 o m i n i mo d i P 
fiorita/' (da. @ (max) a 128 <min>> 

30 Pok e2047■13 : rem 1orazione corre11a P e 
r sPrite 

40 f orn=0to62 : readd ; pok e832+n.■ d : next : rem 
s@rìte creato ora in memoria. 

45 P ok evc+23 .• 128 ; P ok e vc+29, 128 : rem x & y 
di 9randezza doppia 

47 rem«*******3tE**«*9|E***«# 

48 rem vovimento dello s-Prite 
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43 renm***m**m***mm* 

S@ p ok eyc+15 • 100 ; rern coord i nat.? f y 
57 rem##############*###* 


58 rern movi rilento su. x in 2 fasi 
53 rem#*#####*****##*#**# 

60 forx=0to255 • P ok eve+14 , x ■ f or = 1 to25 


: ne 


xt : next 

70 p ok evc+16.' 128 ■ f or x = 0t o64 • P ok e ve ■*‘14, x 
for .i = lto25 : next : next 
77 rem**##*#*##**#**####* 

73 rem##**###*#**#*#*#*** 

80 p ok e vc+16 .■ 0 : P ok evc+21 .■ 0 
37 rem*#*###*#*#*#####*## 


38 rern data 

33 reni#*#*******#***#**** 

100 data 15■123,240,0,129,0,0,129,0,255 
255 


110 

data 

255, 

255, 

255, 

255, 

132, 

i d 

3! <p 

3, li 

4V 

' i— 


31.*3 

, 255 











120 

data 

231, 

255 , 

>255, 

.231, 

255, 

d 

crcr 

■JJj 

231, 

1 cl 

55 

.255 

,231, 

i 255 










130 

data 

192, 

0 ■ 3, 

■ 132, 

.0,3, 

132, 

, 0 

■~i 

255 

' <L 

c:cr 

140 

data 

255, 

255, 

. 255, 

.255, 

1,128 

i 13 

2,1, 

. 1 

■30 

ri 

, 132 

:, 1 











150 

data 

128, 

132, 

. 1,128,13 

’ìL* 7. 

■ ì 

•~i o 
; i ,i 

248 




Questo programma crea un omino (che chiameremo Victor) con le istruzioni DATA nelle 
Linee 100-150 e poi lo abilita (Linea 20) e prepara un blocco di memoria (Linea 30). La 
Linea 40 legge i DATA e li mette in memoria (ricordate che questa è il buffer che va 
sulla cassetta) e la Linea 45 raddoppia lo sprite in grandezza sia verticalmente che 
orizzontalmente. 

La linea 50 mette il nostro sprite in una posizione in basso nello schermo e poi le Linee 
60 e 70 lo muovono attraverso lo schermo. Infine la Linea 80 lo disabilita di nuovo. 
Sono stato breve all’estremo in questa spiegazione, perché essa è sostanzialmente un 
doppione di quello che potete leggere sul Reference Manual o sull’User Manual, se lo 
desiderate. 

Victor e il meaiy bug 

Ho detto nel Capitolo 6 che volevo uno sprite da muovere attraverso il titolo “Il Pianeta 
dell’lncubo”, sul genere di Victor (che sarebbe apparso in diversi momenti durante il 
programma). Avendo disegnato Victor sulla mia griglia, ho lavorato con il mio Sprite 
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Editor fino a che sono giunto ad un piccolo diabolico oggetto, simile ad un insetto che 
sembrava ideale per scorrere tra i titoli, e l’ho chiamato Mealy Bug. È giunto il tempo 
di programmare questi due sprite nel nostro Adventure. 


MODULO 8 1 


1 9oto3 

2 save " @0modu 1 08 .1" ,8 ver i f y " modu I 08.1 ".. 
8 : stop 


3 rem 

3500 P ok ev+39 , 2 : P ok ev+27 .■ 1 : P ok ev+23.. 1 : P o 
kev+29,1 
34970 rem## 


34980 rem poke Puntatori 
34990 rem## 

35000 P ok ev+39 , 2 ; P ok ev+27 , 1 : P ok ev+231 : p 
okev+2‘9,1 

35010 P ok ev+1, 100 : P ok ev , 8 : p ok ev+21 .. 1 
35020 f orx=0to255 : P ok ev .■ x : nextx : P ok ev+16 


, 1 

35030 f orx=0to95 : p ok ev , x ; nextx : P ok ev+16 , 
0 : p ok ev+21 .■ 0 
35040 return 
35070 rem## 

35080 r e m vìctor 
35090 rem## 

35140 P ok ev+48 , 4 : P ok ev+29 .■ 2 : P ok ev+232 
35150 P ok e v+2,80 : P o k e v+3.. 0 : p o k e v+21,2 
35160 f ory =@to 19@ : P ok ev+3y : nexty 
35180 return 
35200 data 99999 
35210 rem## 

35220 rem data sPrite 1 
35230 rem## 

35240 data 255 .■ 128 .■ 0255 , 128,0,1,128 , 0, 1 
, i 28 


35250 data 0,3 , 252,8. 
32.- 63 


O i ■- cr cr ---i a s-,c 
Ó 1 j iJ J ùlclH cU 


35260 data 252 
255,240 


63,255,255,224,0,1,63, 


35270 data 
35280 data 
35290 data 


63 , 255 , 240 , 3 , 1 , 0 , 3 , 25 , 8 , 3 , 31 
0 , 227 , 0 , 0 , 255 , 8 , 0 , 0 , 0 , 0,0 
0 , 0,0 0 0 , 0 0 , 0,0 
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35 

300 

35 

310 

35 

329 

35 

339 

■“iCT 
. J 

340 

35 

359 

35 

360 

8, 

1 


rero** 

reni data sprite 2 
rem** 

data. O .■ 112 .■ 9 .■ 9, 248, 0,1,252 , 0,1,172 
data 0,1,172,9,3,254,0,3,222,28,1 
data 116,29,1,4,28,1,252,8,0,112,8 
data 7,255,8,7,255,8,127,255,248,6 


,j5di’* 9 da.ta. 9,228,258, 0,26'5,25--' ,0,4,1,0, r 
35380 data 255,9 , 7,255, 0, 1,36, 0 
35390 rem** 

35400 setta. 9li sPrite 
35419 rem** 

35429 restore : f or 11 = 1 to 1900 : reada.f : i fa.$= 
"99999"then11=1016 

35430 riextll 

35440 p r,\i e2941 • 14 : P ok e2949, 13 

35456 f or 11 =9to 126 : rea.d4 : P ok e832+11, 3 '■ ne 


xtll 

35460 restore 
35479 retarvi 


Linee 35000-35040: La variabile V, lungo tutta la programmazione dello sprite, si 
riferisce all’indirizzo iniziale del Video Chip (53248) ed era definita nella Linea 280 nel 
Modulo 6.1. In questo modo queste Linee abilitano’ lo sprite, definiscono il suo colore 
e grandezza e lo muovono attraverso lo schermo da sinistra finché non scompare. È 
questa subroutine che mantiene sullo schermo un po’ più a lungo la pagina d’inizio 
riportante il titolo. 

Linee 35140-35180: Queste Linee fanno esattamente la stessa cosa per Victor, tranne 
che lui si muove in una direzione verticale anziché orizzontale, così che sembra cadere 
dall’alto nello schermo e si ferma a circa due terzi della strada, in basso sul lato sinistro. 

Linea 35200: Questa Linea crea la maschera DATA di “99999" per permettere al 
programma di distinguere tra i data sprite e i data che programmeremo più tardi, 
riguardanti gli oggetti che saranno sparsi attorno nell’Adventure. 

Linee 35240-35380: I DATA per i due sprite. 

Linee 35420-35470; La sezione è la subroutine iniziale per settare gli sprite. Per prima 
cosa il 64 provoca un RESTORE, per iniziare a leggere i DATA daccapo. Poi verifichiamo 
che la maschera 99999 (nella Linea 35200, ricordate) impedisca alla stringa di data 
nell’altra parte del programma dall’essere letta per sbaglio, e che compaia quindi un 
messaggio di syntax errar. Infine le istruzioni DATA e gli sprite vengono letti e messi 
nel buffer di memoria della cassetta. Questa è la subroutine che causa un apparente 
blocco del computer proprio all'inizio del programma ed anche dopo il LOAD ed il SAVE. 
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Prova del Modulo 8.1. 


Se cercate di testare questo modulo sembrerà che non succeda niente, perché, sebbene 
noi abbiamo creato i nostri sprite, non c'è niente nel programma per chiamarli. Il 
prossimo modulo correggerà questa mancanza. 


L’introduzione di Victor 


MODULO 8.2 

1 9oto3 

2 save"@0•' m8.2" 1 3 : ver i f y " m8.2 " / 8 : stop 

3 rem 

418 9osub35420 
1200 9osub35000 
2370 rem*# 

2380 rem victor 
2390 rem#* 

2400 P ok ebs, 11 : P ok ebc, 11 : P r i nt " 5!" : P r i rit " 
Personal Robot Victor informa 1 " 

2410 Print"SEiarante Questa avventura sar¬ 
ei ' Pronto ad aiutarvi..." 

2420 PrinfSIDi solito a.P Par irò"' nei morne 
nti di grande tensione e Pericolo!" 

2430 Prinfila vi saro' sempre appresso.* 
anche se non mi vedete." 

2440 input "SEbattete il vostro nome";nf 
2450 9osub 18000 : P r i nt " £l9raz i e " ; n$ ; " V i 
terrò' d'occhio !" 

2460 forni-1 to 1000 : nextm 

2470 Pr int " 2ÈEW3Inizia 1 ' Avventura3.. .. " 

2480 form=1to2000 : nextm 

2490 Pokev+21^0 


Linea 410: Questa è la GOSUB iniziale che setta gli sprite proprio all'inizio nel program¬ 
ma. È lo stesso metodo della GOBUS delle Linee 16100 e 17130 nel modulo 7.2. 

Linea 1200: Con questa Linea tacciamo apparire il Mealy Bug nel titolo principale. 

Linea 3200: Questa Linea interrompe prima il suono (poiché Victor può essere chiamato 
in ogni momento del programma, volevo essere sicuro che qualsiasi suono fosse 
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disabilitato prima di chiamarlo) con la istruzione POKE VO, 0. Poi la GOSUB 35100 
chiamerà Victor. 

Linee 2400-2440: Appena Victor entra in scena, questo messaggio appare con lui. 
Seguendo questo messaggio vi si chiede di immettere il vostro nome (essendo presente 
la variabile N$). 

Linee 2450-2490: Il primo GOSUB nella Linea 2450 verrà onorato dal Modulo 8.4 (che 
introdurremo tra poco) e si riferisce ad una routine di suono. Ho provato ad aggiungere 
un beep o un burp (un indecente ruttino!) ogni volta che ii 64 risponde all'input. Il beep 
è per una risposta okay e il burp è per una risposta non okay (ovviamente!). 

Linea 2460: È un breve loop di pausa, seguito dalla pulizia deio schermo e dalle parole 
"INIZIA L’AVVENTURA..che appariranno in alto sullo schermo, c’è un’altra breve 
pausa (Linea 2480) poi Victor sparisce (Linea 2490 che lo spegne). 

Prova del modulo 8.2 

Il titolo comincia finalmente a prendere forma. Se lo fate eseguire ora, ci sarà una pausa 
significativa mentre la sequenza dei titoli di testa è sullo schermo (mentre gli sprite 
vengono settati), quindi il Mealy Bug viaggerà tranquillamente attraverso lo schermo 
oltre il bordo rosso e le parole "IL PIANETA DELL'INCUBO”. 

Comunque, se proseguite il programma non arriverete ancora a Victor, ma al messaggio 
UNDEF'D STATEMENT ERROR IN 2300. Ciò accade perché la subroutine di Victor 
richiede ora il suono e la Linea 3500 non esiste ancora. 

Adesso ascoltate... 

L’aggiunta del suono al programma è come guardare un film a colori in bianco e nero 
e poi comperare la televisione a colori — in altre parole fantastico. Naturalmente dopo 
un po’ il suono comincia ad essere considerato scontato, ma dopo aver battuto i moduli 
seguenti, vi prometto che noterete una grandissima differenza tra il programma prima 
e dopo questa sessione. 

Comincerò affermando che non ho intenzione di imbarcarmi in una spiegazione sul 
suono e sul chip sonoro. Di nuovo, sia il vostro Manual che il Reference Guide 
contengono una quantità di informazioni su questo argomento — sicché mi limiterò a 
presentare il modo in cui ho ottenuto gli effetti che ho usato. 

Non ho sperimentato nessuna musica vera, in parte per la mia personale incapacità 
musicale ed in parte per mancanza di tempo. Se siete musicofili potete inventare un 
breve motivo introduttivo che sarà anche meglio della mia traccia-sonora. 

Ho cominciato a giocare col suono usando alcuni programmi di esempio nell’User 
Manual, ma sono arrivato ben presto alla conclusione che avevo bisogno di un semplice 
programma tutto mio, che mi permettesse di sostituire i valori differenti per le varie 
forme d’onda, frequenze, ecc. di tutte e tre le voci del 64. Così è stato necessario 
convertire i vari valori delle differenti variabili del chip del suono in numeri semplici, ed 
ho costruito la mia tavola delle variabili, di carattere piuttosto mnemonico (vedi Tavola 
8 . 1 ). Riportata a pagina seguente. 
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Tavola 8.1: Le Variabili Sonore 

VO Volume del suono (VO = 54296) 

W1 Forma d’onda della Voce 1 (W1 = 54276). 

W2 Forma d onda della Voce 2 (W2 = 54283). 

W3 Forma d'onda della Voce 3 (W3 = 54290). 

Al Attacco/Decadimento per la Voce 1 (Al = 54277). 

A2 Attacco/Decadimento per la Voce 2 (A2 = 54284). 

A3 Attacco/Decadimento per la Voce 3 (A3 = 54291). 

51 Mantenimento/Rilascio per la Voce 1 (SI = 54278). 

52 Mantenimento/Rilascio per la Voce 2 (S2 = 54285). 

53 Mantenimento/Rilascio per la voce 3 (SI = 54292). 

HI Alta Frequenza per la Voce 1 (HI = 54273). 

H2 Alta Frequenza per la Voce 2 (H2 = 54280). 

H3 Alta Frequenza per la Voce 3 (HI = 54287). 

LI Bassa Frequenza per la Voce 1 (LI = 54272). 

L2 Bassa Frequenza per la Voce 2 (L2 = 54279). 

L3 Bassa Frequenza per la Voce 3 (L3 = 54286). 

Prima di ritornare al "Pianeta dell'lncubó’ descriverò brevemente il mio programma, 
perché ciò non solo vi sarà d’aiuto per capire alcuni dei suoni che ho trovato, ma 
contribuirà a migliorare il vostro. 


1 9oto3 

2 save " @6ef f et1 i sonar i ", 8 : ver i f y " ef'f ett 
i sonori ", 8 : stop 

3 rem 

5 rz\< t m******mM***w*m+*********m++ 

6 rem Pro9rarnma effetti sonori 

7 rem mike 9race 24.7.83 

8 re Vi****MM*********M*M*WMm****+ 


10 

sc= 

=54272 








20 

wl= 

=54276 

rem 

forma 

d '' onda 

p 

er 

voce 

1 

30 

w 2= 

=54283 

rem 

forma. 

d"onda 

P 

er 

voce 

•“i 

40 

i,.i 3= 

=54290 

rem 

forma 

d onda 

p 

er 

voce 

3 

50 

al = 

=54277 

rem 

attack 

/decay 

p 

er 

voce 

1 

60 

a2= 

=54284 

rem 

attack 

/decay 

p 

er 

voce 


70 

a 3= 

=54291 

rem 

attack 

/decay 

P 

er 

'voce* 

z* 

80 

sl = 

=54278 

rem 

sustai 

n/re l e-; 

i.S 

e 

Per voc 


1 

90 s2=54285 : rem susta in/re lea.se Per voce 
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100 
• •“’l 

s3=54292 ; rem 

sustain / re1ease Per 

voc 

110 

1 

120 

hi=54273 : rem 

alta frequenza Per 

VDC0 

h2=54280 : rem 

alta frequenza Per 

V 0 C 

2 

130 

h3=54287 ; rem 

alta frequenza Per 

VOC€* 

140 

11=54272 : rem 

bassa frequenza Per 

VOC 

e 1 
150 

12=54279 1 rem 

bassa frequenza Per 

'•/OC 

P 

160 

a 

13=54286 : rem 

bassa frequenza Per 

' VOC 

P .*• 

170 

200 

210 

300 

vo=54296 : rem vo 1 urne 

Print "Premi u.n tasto" 

9etat : 1 fat=""then21 0 
f or 1 =0to24 : p okesc+1 > 0 : next : rem azzer 


a le variabili 

320 Pokevo, 15 : rem fissa il voi urne 

330 p ok e a 117 • P ok ea.2 .■ 64 : P ok ea.3 .* 17 : rem se 

ita attack/decaa 

340 P ok es 1.128 : P ok es2 .■ 128 : P ok es3,128 : rem 
setia sustain/release 
358 P ok ew 1 > 33 : P ok ew2 .< 33 : P ok ew3 .. 129 : rem s 
etta 1 un9hezza d' onda 

360 P ok eh1.7 : pok e 11,0 : r em frequenza Per 
voce 1 

370 P ok eh'2 .■ 3 ; P ok e 12 .• 0 ; rem freq uenza P er 
voce 2 

380 P ok eh3.. 1 : p ok e 13.. 0 : rem freq uenza P er 


400 f'ort= 1 to800 • next '• p ok evo .> 0 

450 Prini"batti 2 spazi Per continuare" 

455 print" P' Per stampare - '"f" Per fin 

ire" 

460 Qetat : i f'a'IO " P " andato " f " andato " " t 
hen460 

470 ifat="P"then600 
480 if at="f"thenend 
490 ifat=" "then210' 

690 inPut"tito1o">tt 
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61 y oP e ri 4,4 

6310 p r i nt#4 .. chr $ « 14.:' ; rem co ni 3. rido doppio 
630 Pr i ìì t#4 . t$ r em st-?.mP? il t ito 1 a 
640 P r ì nt #4 ■ chr $ < 1 5 > reni torri.? ?. 11 ' ar>ìP i e 
zza standard 
650 crnd4 1 i et 330-380 

700 Print"ricordate di battere Print#4 c 
lose4" 

900 end 


Linee 10-170: Settano le variabili sonore. 

Linee 200-210: Questa coppia stampa semplicemente il messaggio “BATTI UN TASTO 
QUALSIASI” e aspetta che voi lo battiate, il che provoca l'emissione del suono. È un 
semplice espediente per permettervi di suonare la nota che desiderate. 

Linea 300: Prima di un rumore qualsiasi questa linea setta un loop per spazzolare tutto 
il campo delle variabili del chip sonoro, impostandole tutte a 0. È semplicemente un 
modo per ripartire - ed uso questa linea parecchie volte nel “Pianeta delt’lncubo”. 

Linee 320-380: Come dicono le istruzioni di REM nelle linee stesse queste settano i 
diversi valori. Tutto quello che dovete fare è LISTare il programma e cambiare i valori, 
poi fare di nuovo RUN per ascoltare i rumori cambiati. Provando e riprovando potrete 
eventualmente arrivare ad un suono che vi dia gli effetti desiderati. 

Linee 400-900: La Linea 400 dà la lunghezza della nota. Le Linee 450-460 non sono 
altro che un menu per perttervi di ripetere il suono o finire il programma o stampare un 
LISTING che vi permetta di tener nota dei valori. Le Linee 600-650 sono istruzioni per 
la stampante (nel mio caso la 1515) e la linea 700 non ha in effetti alcuna utilità, se 
non quella di ricordarmi che devo battere “print#4: CLOSE4" alla fine del LISTING. 

Il programma non è particolarmente brillante e l’ho scritto in circa 15 minuti. Ma fa il 
lavoro che volevo facesse - e mentre avrei potuto impiegare tempo e sforzi per fame 
un superbo pezzo di programmazione, con fantastici display e migliori menu, ecc., in 
realtà volevo solo che mi fosse di rapido aiuto. Per questo genere di cose mi va bene. 
La sola ragione per cui l’ho messo qui è per darvi un’idea di come ottenere il suono. 
La stampa di alcuni degli effetti con cui ho prodotto il suono può essere vista nella 
Figura 8.3. 


R OtlZ IO DELL ' ASTRONAVE 

33S POKER 1,17SPCKEA2,17:PC'KEA3,17:REM ATT./DEC. 
340 POKES1,64:P0KE3E,S4:P0KES3,64 ! REM SUST./REL. 
350 PGKEl/jl ,33 : P0KELJ2 ,33 : POKELJ3,1231 REM FORMA ONDA 
3SS POKER 1 ..7 : POKEL 1,113! REM FRED.. VOCE 1 
370 POKEHE,31 : PGKELE , 165 t F.EM FREQ. VOCE 3 
380 PGKEH3,c:P0KEL3,1S7 s REM FREQ. VOCE 3 
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MOTOR I DELL * ASTRONAVE 

33Q POKEA1 , 17SP0KEA2,17:PGKEA3,17:REM ATT./DEC. 

340 POKES1,64iP0KES2,S4 s PQKE33,S4: REM SUST./REL. 

350 P0KEU11 ,65:PGKEW£, 123:PQKEU3,129:REM FORMA ONDA 
360 POKEH 1 .37 : POKEL 1.163: REM FP.EG. VOCE i 
370 P0KEH2,1SP0KEL2,1£:REM FREQ. VOCE 3 
380 P0KEH3,2 :P0KEL3, 187 : REM FRED. VOCE 3 

RONZ IO 2 DELL * S TR O MA V EE 

330 PGKEA 1,225 : P0KEA2 ,££5 : FQKEA3,225 : REM ATT./DEC. 
340 POKES1,128:P0KES2 , 1£3: FOLE33, 128 :REM 3UST./REL. 
350 POKEUi ,65:P0KEM£, i23:P0KEU3,129*.REM FORMA ONDA 
360 POKEH 1., 37: POKEL 1,162 ! REM FRE3. VOCE 1 
370 P0KEH8,1sPGKELE,12:REM FREQ. VOCE 3 
380 P0KEH3,2 :P0KEL3,137'■ REM FREQ. VOCE 3 

BLEEP DIREZ IO MEE 

330 POKEA1,17:PQKEA2,64 !PGKEA3,17 : REM ATT./DEC. 

340 POKES 1, 128 P0KES2, 123 : PGKE33,123 : REM SUST./REL. 
350 P0KEW1,33:P0KEL'J£,33:F0KEU3,33:REM FORMA ONDA 
360 POKEH1,37:POKEL1,162:REM FREQ. VOCE 1 
370 P0KEH2,1 !P0KEL2,125REM FREQ. VOCE 2 
380 P0KEH3,2:P0KEL3,1871REM FREQ. VOCE 3 

BUZ Z 1 

330 POKEA 1,17!P0KEA2 ,64 :P0KEA3, 17 : REM ATT./DEC. 

340 POKESl,123s POKESE,128 :PQKES3,128 : REM SUST./REL. 
350 POKEUI ,33!P0KEUJ2,33:PGKEW3,129:REM FORMA ONDA 
360 POKEH1,7:POKEL1,0:REM FREQ. VOCE 1 
370 P0KEH2,3 :P0KEL2,0 : REM FREQ. VOCE £ 

380 P0KEH3,1 :P0KEL3,6 : REM FREQ. VOCE 3 


Figura 8.3 
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MODULO 8 3 


1 9oto3 

2 save " 00 : modu. 108 .3 " , 8 : ver i f y " modu 108 .3 " 

,8 :stoP 

3 rem 
336 rem## 

340 rem effetto sonoro 
350 rem## 

360 f or 1 =0to24 : P ok esc+1, 0 : next l 

370 p ok evo, 15 : P ok e a 1 , 255 : P ok ea2.. 255 : P ok e 

a.3,255 

380 P ok es 1 , 255 : P ok es2 .■ 255 : P ok. es3.. 255 

330 p ok ei.i 1, 17 : P ok ew2, 33 : P ok ew3,17 

480 P ok eh1,37 : P ok eli,162 : P okeh2, 1 : Pok e12 

,1 :pok eh3,2 : P oke13,187 

1230 P okevo,0 

2000 rem## 

2010 rem Pre-Partita 
2020 rem## 

2030 for1=0to24 : pok esc+1,0 ; next1 

2040 P ok evo, 15 : p ok e a 1,255 : P ok ea.2,255 : P ok 

ea.3,255 

2050 P okes1,128 : P okes2,128 : Pokes3,128 :P o 

k ew1,65 : p okew2,129 Pok ew3,129 

2060 P ok eh 1,37 : P ok eli.. 162 ; P ok eh2, 1 : P ok e 1 

2,12 : P ok eh3,2 ; P ok e 13,187 

2120 i f a $ = " s " t h e ri P o k e v o, 0 

2130 form=1to150 : nextm 

2160 rem caduta. 

2170 f or 1 =0to24 : P ok esc+1 ,9 '■ next l 

2180 Pok evo,15 : Pokea1,140 : Pok ea2,140 : Pok 

ea.3,140 : P ok es 1,0- P ok es2 .* 0 : P ok es3,0 

2190 P ok ew1,35 : p okew2,129 : P okew3,129 

2208 Pok eh 1,37:P ok e11,162 : P ok eh2,1 : P oke1 

2, 12 : P okeh3,2 : P ok e13,187 

2210 P r i nt " 3" : P ok ebs, 0 ; P ok ebc, 0 

2220 Pririt"£El#EBNF , er!SO che vi siate sch 

i anta, ti ! ! !" 

2230 form=1to1000 : nextm 

35100 for10to24 : Pokesc+1,0 : next1 

35110 P ok evo ,15: p Q p e -a 1,190 : P ok ea.2,190 ; P o 
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k e-3.3.. 1 90 : P ok ew 1 ,33 : P ok ew2 , 33 : P ok ew3 , 1 29 
35 1 20 P ok eh 1 .. 75 : P ok e 11 , 69 : P ok eh2 > 2 1 2 : P ok 
e 12 .■ 230 : P ok eh3 .. 1 •' P ok e 13, 1 23 
35 130 ferro-1 to200steP . 25 : Tìextm 
35170 P ok ei.'i 1 > 0 ; p ok e -3. 1 , 0 : P ok ew2,0 : P ok e 3.2.. 
0 : P ok ew3 .• 0 • P ok e-3.3 > 0 


Linea 360: Come ho già detto, questa linea azzera le variabili del chip sonoro. 

Linee 370-400: Questo è il primo suono che sentite nel dare il RUN del programma, ed 
io volevo qualcosa di alquanto misterioso e futuristico - piuttosto simile al tema con cui 
iniziava lo splendido film di fantascienza 'Alien', di alcuni anni fa. I miei sforzi in merito 
fallirono presto, ma mi piace immaginare che vi suggerisca una profonda inquietitudine, 
col rumore che accompagna il titolo d'apertura. 

Dando il valore 255 a tutte e tre le voci per le variabili di Attacco/Decadimento e di 
Mantenimento/Rilascio (vedi la Linea 370 e 380) permetto al suono di alzarsi lentamente 
fino al suo picco. Se il titolo fosse durato più a lungo, il suono sarebbe di nuovo finito 
nel silenzio, ma siccome il secondo schermo appare prima che ciò succeda, c’è 
un’interruzione, dal momento che lo schermo passa da nero a marrone, ed esce il primo 
testo. 

Linea 1230: Questa è la linea che taglia i rumori d’apertura mentre lo schermo passa 
al primo testo, con una POKE VO (il volume), 0. 

Linee 2030-2060: Non appena appare il testo inizia un suono come il tambureggiare di 
una nave spaziale, che rompe il silenzio quando premete S per iniziare il programma. 

Queste Linee provocano quel rumore. Di nuovo notate il lento alzarsi verso un picco 
(nella Linea 2040 le variabili di Inizio Al, A2 e A3 sono settate nuovamente a 255), ma 
questa volta ho mantenuto il volume, settando il Sustain Level alto, con un bassissimo 
Release (il valore 128 per le variabili SI, S2 e S3 nella Linea 2050). 

Linee 2120-2130: Queste due linee si inseriscono dopo il messaggio “PREMI S PER 
INIZIARE”, interrompendo il suono dopo che avete premuto “S”, e quindi provocando 
un breve loop di pausa. 

Linee 2170’2230: Una volta che il giocatore preme S lo schermo diventa di nuovo nero, 
c’è un rumore di frastuono e appaiono le parole “CREDO CHE VI SIATE SCHIANTATI”. 
Esse durano qualche secondo prima che'seguano i suggerimenti circa il montaggio del 
nastro, e il prosieguo delle istruzioni (che abbiamo trattato nei Moduli 7.1 e 7.2). Sono 
queste Linee che producono questo breve scenario. 

Linee 35100-35170: Le ultime linee di questo modulo riguardano Victor. Volevo che 
apparisse con un effetto sonoro piuttosto simile a quello di un robot caduto dall’alto. 
Per caso credo di aver scoperto un suono ideale (sembra più felice di qualsiasi altro). 
La principale differenza fra questa routine sonora e le altre simili sta nella Linea 35130 
dove c’è un piccolo loop POR... NEXT che abbassa il suono non appena Victor cade 
giù. 

Prima di testare questo modulo finiafno di programmare, poiché il modulo finale mette 
l’ultimo tocco alla sequenza d'apertura. 
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MODULO 8.4 


1 9oto3 

2 sa ve " @0 : Pi 8. 4”, 3 ver ì f y “ m8. 4 ", 8 : stop 

3 rem 

17970 rem** 

17980 rem beeP 
17990 rem*# 

18000 f or 1 =0to24 : Pokesc+1 @ : next 1 
18010 P ok evo, 15 : P ok e a 1.. 17 : p ok e a 2,17 : P ok e 
si.. 64 : Pokes2, 64 

18020 Pok ew1 ; 17 :Pok ew2,17 : P ok ehi, 17 : P ok e 
11,195 Pokel2,6 

18030 fort=1to100 : nextt : Pok evo,0 
18040 retu.rri 
18970 rem*# 

18980 rem bur-P 
18990 rem** 

19000 for1=0to24 : P okesc+1,0 : next1 
19010 P ok evo, 15 : p ok e a 1,17 : P ok ea2,64 : P ok e 
a3,17•P ok es1,128 : P ok es2,128 : P okes3,128 
19020 P ok ew1,33 : P ok ew2,33 : Pok ew3,129 
19030 P ok eh1,189 ; P okeli,172 : P okeh2,7 : P ok 
e13,233 :P ok eh3,IPoke13,19 
19040 fort=1to200 : nextt : Pokevo,0 
19950 retar ìì 


Linee 18000-18040: Questo effetto sonoro è un rumore beep. Notate i differenti valori 
per la variabili A (Attacco/Decadimento) e le variabili S (Mantenimento/Rilascio) che 
sono concentrate su un tipo di nota che sale rapidamente e poi cade veloce, piuttosto 
che una lenta ascesa ed un calo dei suoni precedenti. Ho inoltre usato solo due voci 
per questa nota e l’ho tenuta corta (FOR T=1 TO 100). Lo scopo di questa subroutine 
è di suonare quel rapido, abbastanza piacevole rumore, per far sapere al giocatore 
come ha risposto il 64. 

Linee 19000-19050: Questa subroutine procura un rumore di burp alquanto più lungo 
(in effetti è più di un burp musicale) che dice al giocatore di aver fatto un versaccio! 
Riservo questa nota per i messaggi di errore o per quando avete fatto qualcosa di 
stupido. Questa volta ho usato nuovamente tutte le voci brevi, ed ho incluso la forma 
d’onda del rumore bianco (POKE W3, 129 nella Linea 19020) da aggiungere all'effetto. 

Prova dei Moduli 8.3 e 8.4 

Il momento è arrivato. 
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Allungatevi comodamente davanti allo schermo e battete RUN. 

Dovreste trovare una notevole differenza ora nel vostro programma. Prima di tutto, quel 
certo inquietante rumore mentre compaiono fuori i titoli, e il Mealy Bug svolazza 
tranquillamente attraverso lo schermo. Poi il rumore profondo dei motori, mentre 
l’astronave inizia a seguire la propria rotta attraverso lo spazio. Poi l'improvvisa interru¬ 
zione non appena fate partire il gioco - seguita dal frastuono della nave che si fracassa 
sulla superficie del Pianeta dell’lncubo. Una pausa, poi rispondete con N per i consigli 
sul nastro e le istruzioni - e Victor appare (lo vedete per la prima volta) con un rumore 
che riconoscerete. Egli cade sul posto, il suono smette, e dopo aver letto il messaggio 
potete immettere il nome. C’è un gradevole rumore di “beep” - Victor risponde e lo 
schermo si cancella con il messaggio “—INIZIA L’AVVENTURA...”. Poi Victor sparisce. 
Con il programma allo stato attuale potete inoltre ottenere nuovamente le Pagine di 
Istruzione, poiché il programma proseguirà naturalmente in quella parte. Spero proprio 
che voi cominciate ad apprezzare alcuni degli sforzi che ho impiegato nel costruire un 
po’ di suspense all’inizio del gioco. 

Sommario 

Ho cercato di essere molto breve nella descrizione dei meccanismi di programmazione 
di questo capitolo, principalmente a causa di mancanza di spazio. Ho trovato che usare 
gli sprite e il suono non è così difficile come può sembrare nel Reference Guide, e 
incoraggio quelli di voi che non hanno dimestichezza in PEEK e POKE e sedersi per 
un paio d’ore con la Guida e il vostro 64 e lavorarci sopra: avrete successo. 

Le capacità del computer saranno dispiegate, non appena avrete superato il primo 
problema: apprendere qualsiasi nuovo trucco - considerate quanto detto come il primo. 
I titoli sono finiti e voi siete preparati a partire, cioè ad entrare nel programma. Il Capitolo 
9 si rivelerà essere la maratona del libro - le Locazioni. Ma coraggio... il meglio sta per 
arrivare. 
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CAPITOLO 9 

DOVE SI VA DA QUI? 


Questo capitolo è probabilmente il più avvincente e il più noioso allo stesso tempo. 
Avvincente - perché dopo che avete finito di programmare i Moduli 9.1 e 9.2 siete in 
grado di vedere l’intero orizzonte della Adventure e siete in grado di maneggiare tutte 
le Locazioni. Noioso perché c’è una grande quantità di cose da battere, poiché si tratta 
ora del testo stesso. 

Non ci sono scappatoie per evitare questa programmazione - ma trovo che battere 
tutte le linee del testo non è poi così brutto come sembra poiché scrivere parole è più 
facile che scrivere in BASIC. Questo è tuttora il mio problema! 

Creazione della mappa 

Abbiamo già trattato i principi delle mappe nel Capitolo 2, e disegnato la mappa base 
per II Pianeta dell’lncubo nella Figura 5.2. nel Capitolo 5. Ma alla vera Adventure occorre 
una mappa migliore di questo - una con molte Locazioni, per conferire una dimensione 
alla storia e dare la sensazione al giocatore di disporre di grandi spazi. 

La Figura 9.1 mostra la mappa alla quale alla fine sono giunto. Essa segue il piano di 
base del mio precedente tentativo, ma ho introdotto un tempio nella città diroccata e la 
foresta si è ingrandita considerevolmente. Altri affinamenti alla storia originale includono 
un messaggio nel tempio (Casella 22) e un tesoro nella foresta (Casella 38) ed il cristallo 
di energia si trova ora nel lago (Casella 13). 

I numeri nelle caselle nella Figura 9.1 sono puramente fittizi, perché convertendo la 
mia mappa in una griglia li cambierò - come mostra la Figura 9.3. 

Per convertire la mappa in forma di griglia ho disegnato una griglia standard 10x10 
per poter trattare con differenti disegni (vedi Figura 9.2). 

La mappa originale è stata praticamente presa in blocco e messa così com’è nella 
griglia - io ho fatto solo qualche cambiamento. Una volta che la mappa finale è stata 
approntata, allora si tratta semplicemente di piazzare gli oggetti appropriati nelle loro 
Locazioni e si è ora in grado di riprendere e programmare. 

Trucchi per tracciare la mappa 

Prima di cominciare a sviluppare la vostra Adventure, vi suggerisco uno o due trucchi 
che mi sono stati utili: 

1. Disegnate sempre a matita - cambierete una quantità di cose man mano che 
sviluppate idee e cambiate Locazioni. 

2. Cercate di incorporare un’area 'labirinto' dove si trovano parecchie Locazioni ed 
anche quantità di uscite per permettere al giocatore di perdervisi dentro. Il tempio e la 
foresta sono esempi di ciò nel Pianeta dell’lncubo. 
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Figura 9.1 Mappa finale per “Il pianeta dell'lncubo'’ 


100 


















3. Alcune Locazioni hanno solo una direzione a senso unico. Se guardate la radura 
nella Locazione 53 nella Figura 9.3 noterete che ci sono frecce che escono dalla radura 
in tutte le direzioni, ma potete entrare solo da ovest e da nord. Un buon modo di usare 
questa possibilità è di avere una Locazione riservata a, diciamo, una caverna o una 
stanza, che vi permetta di entrare ma non di uscire prima che un certo lavoro sia 
eseguito. Mostrerò ciò nella Locazione 92 più avanti nel libro. 

4. Non siate troppo ambiziosi con oggetti e pericoli. L’ammontare della memoria 
necessaria per mettervi in grado di trattare con essi è fondamentale (come vedrete più 
tardi) ed il meglio è partire dal piccolo e ingrandire in seguito, se è possibile. 
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Figura 9.2 Una griglia 10 x 10 
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GLI ELEMENTI IN CD SONO PERICOLI 
GLI ELEMENTI IN □□ SONO OGGETTI 


Le locazioni 

MODULO 9.1 

1 9oto 3 

2 save " @0 ; modu. lo3. 1 "8 : ver i fa " moda 1 o9. 1 " 
; 8 : stop 

3 rem 

19970 rem** 
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19980 rem luo9hi 
19998 rem#* 

20000 rem 1 

20010 9 o 5 .ij.ti 22050 : n=0 : e=2 -5=11 : w=Q : 9oto4 
150 

20020 rem 2 

20030 Print"HWIentre avanzate ancora di 
Piu/ dei Pezzetti di carta vi "■ 

20040 Print"attraggono. In una fessura d 
el muro c'e' un messaggio con la "* 

20050 Print "grafia di aurora. Nell - " incer¬ 
ta luce Potete 

20060 Print "riconoscere Proprio le Par-ol 
e man9 i a noe i. 11 

20070 n=0:e=3:s=12 : w-1 : 9oto4150 
20080 rem 3 

20090 P r i nt " SPIRvanzando semP re P i uP rot o 
fidamente nel cuore del'/ 

20100 P r i nt " temP i o ■ d i venta bu. i o e um i do. 

Le Pareti sono coperte con ".■ 

20110 Print"una fetida melma maligna che 
sembra Pulsare con luce 
20120 P r int "ma 1 et"ica." : n=Q : e=4 : s=13 : w-2 
: 9oto4150 
20130 rem 4 

20140 Print"ME' Proprio buio dentro il 
tempio. Il terreno e - " sconnesso '/ 

20150 Print"e spesso cadete. Appare un P 
assaggio " 

20160 P r i nt"verso ovest . " '■ n=0 : e=0 : s=0 : w 
=3 : 9oto4150 
20170 rem 11 

201A0 gosub 22050 : n= 1 : e= 12 : s=0 •' w=0 : 9oto4 
150 

20190 rem 12 

20200 90SU.b 22050 • fi=2 ■ e=l -3 ■ S“22 ■ U®11 - 9t- 
o4150 

20210 rem 13 

20220 Print"flWIDentro al tempio e" troPP 
o buio per vedere bene. Passaggi "j 
20230 Print"sembrano mandare in Parecchi 
e direzioni. Qual'e' 1 a mi91iore?" 

20240 n=3 : e=14 ; s=0 : w=12 : 9oto4150 
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20250 reni 14 

20260 Print" Si Siete in un edificio che P 
are un tempio. " , 

20270 Pr int “Sul P av ì mento fuori la stanz 
a ci sono se9ni "1 

20280 Print"traceiati sul fan9o del corr 
iddio. Sembra come una "> 

20290 Print"traccia Puntata ad ovest den 
tro il tempio." 

20300 n=0 e=15 : s=24:w=13 ; 9oto4150 
20310 rem 15 

20320 Print"SUL a ricerca delle tracce v 
i rende un turbine - Pronti a 
20330 Print" tutto. Ma solo le Pietre re¬ 
stano insensibili - ovviamente 
20340 P rint"a11a vostra Paura. Forse non 
sono morte- dormono solo..." 

20350 n=0 : e=0 : s=25 : w=14 ; 9oto4150 
20360 rem 22 

20370 9osub 22050 : n=12 : e=0 : s=0 : w=0 : 9oto4 
150 

20380 rem 24 

20390 Print" SiiFlvete 1 impressione che 4 
ualcu.no vi osservi nascosto nelle " 

20400 Print"ombre. Nel silenzio volete u 
ria r e ■ chi a m a r e a. i ut o • f a re 11 
20410 Print"Qualsiasi cosa Per sapere se 
c'e4ualcune di vivo 4ui in "; 

20420 P rint"4 uesto P osto morto." : n=14 : e= 
25 : s=0 : w=0 : 9oto4150 
20430 rem 25 

20440 Print" Sili 1 vento fischia deridendo 
vi., spettrale suono tra le Pareti 
20450 Print"rocciose, mentre Passate Per 
stanze vuote, spalancando finestre. "> 
20460 Print"Solo 4uesto rimane della Pas 
sata civiltà?" 

20470 n=15 : e=26 : s=0•w = 24 : 9oto4150 
20480 rem 26 

20498 Print" Siifv'orreste vedere dove siet 
e, nella citta'! Se solo " 

20500 Print"Poteste trovare una v ia, ma 
i m u. r i s b recciati del 1 / o s c u r a c a sa 11 
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20510 Print"bloccano o9ni via eccetto un 
intrico di cunicoli verso ovest." 

20520 ri—0 • e-0 : s=36 : w=25 : 9oto4150 
20530 reni 28 

20540 P rint" 3US iete suIla riva di un la9 
o. Le Pietre nell'acqua sembrano "J 
20550 Print"riflettere la luce del sole 
come se avessero "< 

20560 P r i nt " un P otere ma.9 i co. 11 • n=0 : e-0 : s 
=38 : 1.0=0 : 9oto4150 
20570 rem 36 

20580 Print"*Hda qui Potete chiaramente 
■■/edere che le torri e le 
20590 Print"9u9lie sono ora le sbrecciat 
e rovine di una fiera citta' "• 

20600 Print' 1 abbandonata da91i abitanti. 

il 

20610 n=26 : e=37 : s=46 : w=0 : 9oto4150 
20620 rem 37 

28630 Print" Sili nfine la sabbia Prende il 
Posto dei ciottoli e sassi • 

20640 Print">ldovrebbe essere il marcine 
del deserto. Ci sono "> 

20650 P r i nt " a l cun i a l ber is i m ili a cesP 
u.9li con frutti come noci di cocco "> 
20660 P rint"P endono da essi." : n=0 ; e=38 ; s 
=47•w—36•9oto4150 
20670 rem 38 

20680 Print"SWMSiete fermi nel deserto. 

R nord Potete vedere un la9o. 


20690 

p rint" 

ftd 

est 

il 

deser 

to tocca. 

l'or 

izzonte. 







20780 

n=28 : r 

=0 

: s=38 

: i ,.i = 

=37 ; 9c 

•to4150 


20710 

rem 42 







20720 

9osub 

JL C- 

110 : Ti 

=0 

■ e=43• 

s=52 : w=0 : 

9oto 


4150 

20730 rem 43 

20740 9osub 22070 '• n=0 : e=44 : s=53 : ui=42 : 9ot 
o4150 

20750 rem 44 

20760 9osub22110 : n=0 : e=0 ; s=54 : w=43 : 9oto4 
150 

20770 rem 46 
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20780 Pr int" 9 Fi nche- se il sole sta coro in 
ciancio a crearvi 

20790 Print"confusione nella mente - all 
or 1 zzonte nord aP P a i o no " ; 

20800 Pr int"9u.9l ìe e torri di una citta/ 

. O e' solo un mira.99io " • 

20810 P rint"che vi tortura ??" : n=36 : e=37 
: s=56 ; w=0 9oto4150 
20820 rem 47 

20830 Pri nt" aMentre cammi nate rapidi sul. 
la sabbia rovente Potete vedere "> 

20840 Print" i se9ni di dove la vostra a 
stronave e f caduta atterrando. " • 

20850 Print"Vi chièdete come farla riPar 
tire. 

20360 n=37 : e=46 : s=57 : w=46 : 9oto4150 
20870 rem 48 

20880 Print"Silflvete camminato Per ore e 
p ote te ve dere ".; 

20890 Print" che la vasta distesa di sab 
bis. non ha fine. Infatti sapete che "! 
20900 Print"se non tornate Presto indiet 
ro morirete a causa "> 

20910 Print"de11'ardore del sole che sem 
bra fisso alto nel cielo." 

20920 n=38 : e=0 : s=0 w=47 : 9oto4150 
20930 rem 52 

20940 9osub 22070 :n=42:e=53 : s=62 : w=0 : 9ot 
o4150 

20950 rem 53 

20960 Print"risiete in una Piccola radur 

a tra 91i alberi. Un soffice muschio 

20970 Print"ricopre le rive di uno sta9n 

o azzurro e silenzioso > dalle "J 

20980 Print"ac4ue immote! rimanete Per u 

n Po - ' Prima di ricominciare la 

20990 print"ricerca." ; n=43 : e=54 : s=63 : w=5 

2 : 9oto4150 

21000 rem 54 

21010 Print" atlentre 1 ottate con rovi e 
fogliame mandate occhiate 
21020 Print"speranzose alla radura verso 
ovest., ma vi sembra di 
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21030 Print"non essere capaci di ra99i.un 
9erla ! !" : n=44 ; e=55 : s=64:w=@ : 9oto4150 
21040 rem 55 

21050 Print" «USiete Proprio nella fores¬ 
ta ora j con alberi 9rossi come case 
21060 Print"sianeiati al cielo- che imPe 
discono la vista del sole. 

21070 Print"finimaletti balzano fuori e f 
u.99ono davanti a voi." 

21080 Print"Due sentieri si inoltrano - 
uno a sud l'altro ad ovest." 

21090 n=0 : e=56 : s=65 : w—54 : 9oto4150 
21100 rem 56 

21110 Print"sWMSiete al limite di un des¬ 
erto - la sabbia cambia subito 
21120 Print"in erba di boscaglia. Verso 
ovest "; 

21130 Print"un'oscura foresta riemPie il 
cielo come uno spesso tappeto "• 

21140 Print" verde." : n-46 : e=57 : s=0 : w=55 : 
9oto4150 
21150 rem 57 

21160 Print" SiH5)3ra siete all'esterno de 
11'astronave. Attorno ci sono tracce ", 
21170 Print"di bruciature e di frammenti 
carboniizzati dell'astronave. Siete " ; 
21180 Print"caduti in un arido deserto d 
i sabbia rossastra. 

21190 n=47 : e=58 : s=67:w=56 : 9oto4150 
21200 rem 58 

21270 Print"WISSiete nella cabina. 

21290 Print"lilSJna delle tute spaziali m 
anca. "■ 

21300 print"Sul Pavimento vedete un Pezz 
etto di vestito che 

21310 Print"riconoscete come un Pezzetto 
della gonna che la Principessa Aurora"; 
21320 Print"indossava l'ultima volta che 
1'avevate vista.." : 9oto21380 
21380 n=0 : e=59 : s = 0 : w = 57■9oto4150 
21390 rem 59 

21430 P r i nt "&E1SS i e.te ne Ila cab i na de 11 ' a 
stronave; la caduta ha sparso 
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21440 Print" il co ritenuto del vostro bau 1 
e tutto sul P avi merito. 

21460 Print"Nonostante ciò - ' scorgete i s 
e9ni di una lotta. 

21470 P r i nt " S#l§**#La Principessa e / sPar 
ita 1 *##" 

21480 P r i nt" :15ill l P arme 11 o d i contro 11 o 
registra che la cabina e - ' stata 
21490 Print"aperta dall'esterno e Poi ri 
chiusa..." 

21500 n=0 : e=0 : s=0 : w=53 : 9oto4150 
21510 rem 62 

21520 9osub 22070 : n=52 : e=63's=0 : w=0 : 9oto 
4150 

21530 rem 63 

21540 9osub 22110- ri=0 : e=64 : s=0 : | .-. , -62 : 9oto 
4150 

21550 rem 64 

21560 P r i nt " ;>La fcresta e asso l utament 
e troppo grande Per trovare ".; 

21570 Print"la via Per uscire.: state coro 
iridando a Preoccuparvi " 

21580 print"chiedendovi cosa mai Potrebb 
e succedere. 

21590 n=54 : e=65 : s=74 : w—63 : 9oto4150 
21600 rem 65 

21610 Print" SMKliuesto sent iero sembra co 
ridurre via dal sole., dentro 
21620 Print "un'oscurità/’ che non Pensava 
te P oss i b i l e nella l uce " 

21630 Print"del sole. Dietro di voi ci s 
ono dei rumori.* come se Gualche ".: 

21640 Print"animale colossale vi stesse 
seguendo." : n—55 ; e—0 : s=0 : w-64 : 9oto4150 
21650 rem 67 

21660 Pri nt " ^II l deserto d i venta a 11 " i mP 
rovviso Pieno di vegetazione".: 

21670 Print" che sembra infoltirsi ad o9 
ni Passo. Guardando meglio intorno ".: 
21630 Print" - il terreno sembra farsi P 
aludoso. "> 

21690 n=57 : e=68 ; s=0 : w=0 : 9oto4150 
21700 rem 68 
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2171 Gì Print"SlilSiete in una. Palude, cala 
.. vi schi osa e fastidiosa, "i 
21720 Print"Potete sentire il rumore di 
un fiume - immenso e veloce.",; 

21730 Print" fìd est c"'e" il fiume - ad o 
vest la Palude. 

21740 fi—0 : e=69 : s—0 : u.i = 67 • 9oto4150 
21750 rem 69 

21760 Print."SitE cosi' - rinfrescante sed 
ere su. 11 a r i va de 1 f i urne e " .■ 

2177& Print" dondolare i Piedi bollenti 
nella fresca corrente. Ma il fiume 
21780 Print" e'" lar9o, come un mare agit¬ 
ato a 11 or i zzonte. Sarebbe " .; 

21790 P ri nt "ìmP ossibi1e da attraversare. 
" : n=0 : e=0 : s=0 ui-68 : 9oto41 50 
21800 rem 69 

21810 Print"SiitSiete sulla strada verso 
il sud della foresta. Il manto 
21820 P rint" liscio su99erisce che sia s 
tata fatta da un'antica civiltà" 11 
21830 Print"superiore a qualsiasi altra 
nota. Ma la strada e" ancora usata..."J 
21840 Print" o e" solo un relitto di 9lo 
ria Passata ?" 

21 850 n=64 : e—0 : s=84 ; w=@ '■ 9oto4150 
21860 rem 84 

21870 Print"SiLa strada si snoda in una 
verde Pianura - indugiando a nord " 

21880 Print"e a sud come una corda getta 
ta da una mano gigantesca. " 

21890 Print"Da11"a1tra Parte 1a ve9etazi 
one s i avv i c i na. v i eP P i u "... " 

21900 n=74 ; e=0 : s=94 : »,.i=0 : 9oto4150 
21910 rem 92 

21920 Pri nt"SiilSiet-e in una casa infanga 
ta. Pezzi di terracotta Preistorica " 
21930 Print" crepitano sotto i vostri Pi 
edi." : n=0 : e=93 : s=0 : w=0 : 9oto4150 
21940 rem 93 

21950 P r i n t 11 Si i F r e n d e t. e 1 a via Per il vi 
11 a 9 9 i o s P e r a. n d o che 91 1 i n d i 9 e n i " 

21960 P r i nt " s i ano am i chevo 1 i. " : n-Gi : e=94 
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:s=0 w=92 ; 9oto4150 
21970 rem 94 

21980 Print"sMISiete fuori la cinta del 
vili *99 io. Case sud i c i e " ; 

21990 Print"sono sparse intorno alla rin 
fusa. " 

22020 Print"Il villa.99io Pare deserto., rn 
a sentite una donna che "; 

22030 Print"canta mestamente in una capa 
nna. 

22040 n=84 : e=0 : s=0 : w=93 : 9oto4150 
22050 Print"ariete in una specie di ded 
alo di curve e incroci"; 

22060 Print" temendo non Poco'' di esserv 
i p erduti : return 

22070 Print"SiPotete esservi Perduti nel 
la foresta. Date un'occhiata alla 11 ; 
22080 Prinf alla radura., un Po' ad est.. 
un po' a sud..." ; 

22090 Print"e sempre il rumore di una 4u 
alche bestia terribile eche99ia e ".: 
22100 Print"vibra tra le fo9lie intorno 
a voi." : return 

22110 Print"«Che foresta - questa ! Semb 
rate definitivamente P erdut i . " 

22120 Print"Forse avreste dovuto rimaner 
e a. casa... senza offrire " • 

22130 Print "ad fìurora P3.ss3.99 io sulla vo 
stra nave !" : return 


Questo modulo è fatto apposta per la programmazione delle Locazioni. Alla fine del 
modulo ci sono tre subroutine (Linee 22050, 22070 e 22110) che ho inserito per il 
tempio e la foresta, per risparmiare un po’ di spazio e confondere il giocatore - poiché 
riceverà la stessa risposta sullo schermo in parecchi posti. A parte ciò, si deve battere 
tutto fino alla fine. 

Nella Locazione 2 (Linea 20060) c’è un messaggio alquanto enigmatico scarabocchiato 
sulla parete - MANGIA LE NOCI - che risulta essere una indicazione di aiuto piuttosto 
oscura per il giocatore, che può non aver dedotto che 'mangiare’ le noci nella Locazione 
37 gli permetterà di togliere la tuta spaziale - un requisito necessario se vuole liberare 
Aurora. Mi piace l’idea di lasciare in giro oscure indicazioni, ed infatti questo tempio 
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contiene un paio di indicazioni che dovrebbero obbligare il giocatore a tirare ad 
indovinare. Messaggio a parte, c’è una freccia scarabocchiata nella polvere, che punta 
nel tempio, nella Locazione 14. È stata lasciata da Aurora? Si trova ella ancora da 
qualche parte nel tempio? 

Ho cercato in effetti di introdurre in vari punti un elemento di mistero e di pesante 
tensione. A parte le indicazioni che vi portano a provare ed a cercare (senza frutti) 
Aurora nel tempio - probabilmente lei era lì ma era stata portata via al villaggio indigeno, 
prima che arrivaste voi sulla scena - ho aggiunto qualcosina circa le bestie misteriose 
della foresta (che non ho mai materializzato) ed la gemma nella radura della foresta, 
un semplice specchietto per le allodole, che non ha nessun ruolo utile. 

Oltre una certa estensione questa Adventure non può essere complicata. In questo 
caso è da considerarsi come un programma d'esempio - non una irrisolvibile Adventure 
in grande stile. 

Ricordate i trucchi per battere il testo, che ho descritto nel Capitolo 6 riguardo il provare 
poche linee man mano che procedete. È abbastanza facile fare ciò in questo modulo 
perché finiscono tutte in GOTO 4150, linea che non avete ancora immesso - cosicché 
dando direttamente l'istruzione GOTO 20080 (per la Locazione 3 ad esempio) otterrete 
una stampa della Locazione, poi il messaggio di UNDEF’D STATEMENT ERROR ed il 
programma si interromperà, permettendovi di fare LIST delle linee rilevanti ed alterarle, 
come desiderate. 

Non dimenticate inoltre di iniziare ogni nuova Locazione con il tasto CONTROL ed il 
tasto “1” per colorare il testo di nero. 


Il movimento nell’Adventure 
Variabili nel Modulo 9.2 

OB% Valore intero dell’oggetto in un Vettore Oggetto. 

OB$ Descrizione in una parola singola dell’oggetto. 

Sl$ Descrizione con una frase dell’oggetto per la Locazione. 

Questo modulo riprende gli stessi principi del Capitolo 2 del mio programma d’esempio, 
perciò non intendo entrare in dettagli. Le linee in molti casi sono esattamente le stesse. 


MODULO 9.2 

1 9oto3 

2 save " @0 : m9.2 " ^ 8 : ver i f a "m9. 2 " 8 : stop 

3 rem 

3670 rem#* 

3680 rem data o99etti 
3690 rem#* 


in 



3700 f or 1=1to9 readob/i < i ) .• ob$ ( ì >.. ■=. i $ < i > : 
next ì 

3719 data 15,corda,u.n ratto si diroena. Pr 
eso al laccio nel 1 'an9olo 

3720 data 28, cr ì sta Ilo, il cr1 sta Ilo ener 
9etico rifulse di luce nascosta 

3730 data 37,noci,ci sono alcune noci Pe 
r terra 

3740 data. 47,rottame, inciampate in un ro 
t taro e 

3750 data 53,9eroma, i l riflesso di una 9e 
roroa vi attrae 

3760 data 58,tu.ta-sPazia1e,1a navìce11a 
e' «lui ancora intatta. 

3770 data 59, ro i t r a 91 i e 11 a, 1 a v o s t r a ro i t r 
a 91 i e 11 a e ■' i n t e r r a 

3780 data 69,colte 11 o, tra i sassi c■'eu 
n co1te 11o P reistorico 

3790 data 92, aur or a., vedete a.ur ora. sana e 
sa l va 

3970 re ro*# 

3980 rem P 
3990 rem#* 

4000 P=59 : 9oto4@20 
4010 P=P2 

4020 i f P <1111 h e n o n p 9 o t o20000,28828,28£18 8, 
28138 

4030 1fP<21thenonP-189oto28178,28198,282 
10,20250,28318 

4840 ifp<31thènonP—209oto0,20360,0,20380 
,20430,20480,8,20530 

4050 ifP<41thenonP-309oto0,0,0,0,0,20570 
,28620,20670 

4068 ifP<51thenonP-409oto0,28718,28738,2 

8750,0,20770,20820,20870 

4078 ifP<61thenonP-509oto0,20930,20958,2 

1800,21040,21100,21158,21208,21390 

4080 ifP<71thènonP-6090tow,22518,21530,2 

1550,21680,0,21650,21700,21750 

4098 ifP <811henonP- 7 89oto8,0,8,21888 

4100 j. f P <911 h e n o n P - 8 0 9 o t o 0,8,8,2186 0 

4118 ifP <181thenonP-989ot00,21918,21948, 
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21970 

4120 rem## 

4130 rem vedi o99etti 
4140 reni## 

4150 f or i = 1 to9 : i f ob?i < i > =P thè nP r ì nts i i < i > 
4190 

4160 nexti 
4290 rem## 

4300 reni uscite 
4310 rem## 

4320 Print "«©Potete .iridare a"; 

4330 ifn>0thenPrint" nord"; 

4340 i f e>0theriP r i nt " est " ; 

4350 ifs>0thenPrint" sud"; 

4360 ifw>@thenPrint" ovest"; 

4970 rem## 

4980 rem istruzioni 
4990 rem## 

5000 Printchr$<13) : x=fre<0) 

5010 i nP ut " SI struz i on i : )*I#IIH" ; ì si 
5028 Pokev+21.. 0 

5030 ifi$="#"thenP rint" MBT' ■ 9oto5910 
6470 rem## 

6480 rem i i 
6498 rem## 

6500 ifi$="nord"theni $= "n" 

6510 ifi$="est"theni$="e" 

6528 iti i— "sud"theni$="s" 

6530 ìfi t~ "ovest"theni i ="o" 

7170 rem## 

7180 rem movimento 
7190 rem## 

7280 ifi$="n"andn>0thenP2=P-10 : 9osub1800 
0 : 9oto4010 

7210 i f i 4 ! = " e " ande>0thenP 2= : P +1 : 9osub 18080 
: 9oto4010 

7220 i f i i= " s " ands>0thenp 2=P + 10 : 9osu.b 1800 
0 :9oto4010 

7230 ifi i- "o"andw>0thenP2=P-1 : 9osub1 8000 
: 9oto4010 

7260 9osub 19000 : Print'^tBP i aceri te - non P 
otete andare di 1 i : 9oto4328 
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Linee 3700-3790; Ho riportato qui sotto nella Tavola 9.1 nove oggetti del "Pianeta 
dell'lncubo ”. 


Tavola 9.1 Oggetti del Pianeta dell’lncubo. 


1. CORDA 

2. CRISTALLO 

3. NOCI 

4. ROTTAME 

5. GEMMA 

6. TUTA SPAZIALE 

7. MITRAGLIETTA 

8. COLTELLO 

9. AURORA 


LOCAZIONE 15. 
LOCAZIONE 28. 
LOCAZIONE 37. 
LOCAZIONE 47. 
LOCAZIONE 53. 
LOCAZIONE 58. 
LOCAZIONE 59. 
LOCAZIONE 69. 
LOCAZIONE 92. 


Queste linee sistemano gli oggetti presenti in istruzioni DATA. 

Linee 4000-4100: Usando lo stesso principio del programma d’esempio, queste linee 
settano appunto la posizione (P = 59 che è la cabina della nave spaziale - vedi la 
Griglia nella Figura 9.3) poi indirizzano il 64 alla Locazione appropriata una volta che 
deciderete di muovere, tramite l'istruzione ON...GOTO. 

Le linee 4150-4160: Un loop per esaminare i dati relativi agli oggetti. Se sono nella 
Locazione, allora SI apparirà sotto il testo che avete battuto nel Modulo 9.1. Una 
volta ancora puntualizzo l’importanza di avere un aspetto conveniente per SI , ovunque 
l’oggetto venga a trovarsi. Perciò se abbiamo detto "IL CRISTALLO BRILLA NELLE 
PROFONDITÀ DEL LAGO" per l’Oggetto 2 (il cristallo), quando ci si arriva la prima 
volta, tutto ciò sembrerà carino; ma supponete ora di lasciar cadere il cristallo nella 
Locazione 59; allora quello stesso messaggio suonerà alquanto sciocco, trovandoci ora 
in una nave spaziale. 

Linee 4320-5030: Innanzi tutto provocano l’apparizione di “PUOI ANDARE" seguita 
dalla direzione appropriata, quindi l’input di “ISTRUZIONI?” che esce dopo ogni movi¬ 
mento. Ho scelto l’input "ISTRUZIONI?" piuttosto di “COSA DEVO FARE ORA?” 
perché mi pareva che fosse più conveniente a Victor ed all’immagine da Fantascienza 
del gioco. 

Notate i 2 “cursor right", il simbolo “ ” seguito da 3 "cursor left”. Ciò mette sullo 
schermo un asterisco sotto il cursore lampeggiante - che mi pare migliore del semplice 
cursore. La Linea 5030 previene ogni azione nel caso l’utilizzatore batta il simbolo 
“ ” - poiché esso sposta il cursore indietro, sopra l’asterisco. 

La Linea 5020 provoca nuovamente il POKE off di Victor. 

N.B. Nella Linea 5000 x = FRE(0) è un modo di fare una veloce 'raccolta di rifiuti' per 
cancellare tutte le stringhe di spazi, in modo da evitare un errore di OUT OF MEMORW. 
Linee 6500-7260: Ancora linee standard di movimento. Notate che abbiamo P - 10 e 
P 4- 10 per il movimento verso nord e sud poiché abbiamo una griglia 10 x 10, e notate 
anche le subroutine di beep e di burp (GOSUB 18000 e GOSUB 19000) in queste linee. 
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Prova dei Moduli 9.1 E 9.2. 


Troverete questo compito altrettanto piacevole (se non di più) di quello di testare i 
Moduli 8.3 e 8.4. Ora potete realmente spostarvi nella mappa e vedere gli oggetti 
disposti nelle Locazioni appropriate. 

Utilizzate un po' di tempo per esplorare, immaginando di giocare per la prima volta. C’è 
una certa soddisfazione nel sentirsi in grado di spostarsi nella Adventure. 

Faccio qui un appunto per quando progetterete il gioco, lo ho per prima cosa definito 
le Locazioni come se stessi partendo con la nave ed esplorando veramente - per 
esempio volevo dire “State lasciando il deserto ed entrando nella città diroccata...”. 
Questo suonava bene nel caso della città - ma se in seguito stessi lasciando’ nuovamen¬ 
te la città, sembrerebbe piuttosto strano vedere il messaggio “State lasciando il 
deserto..." perché non sarà così! lo sto’ lasciando la città! 

Perciò provate sempre a scrivere la descrizione, anche se potete andare sia dentro che 
fuori la Locazione, ed essa vi sembra giusta. Il tempo passato a tirar fuori queste cose 
in precedenza è ben speso, ed infatti stavo cambiando alcune delle diciture delle mie 
Locazioni quando proprio all’ultimo momento individuai un altro errore!! 

Questo capitolo è stato una prova di programmazione abbastanza estenuante - ma il 
risultato dovrebbe apparire di grande effetto. Il prossimo passo sarà di cominciare a 
raccogliere ed a lasciar cadere gli oggetti. 

Sommario 

Secondo me l'aggiunta delle locazioni è la parte più interessante, probabilmente, 
dell’intero gioco. Alla fine posso cominciare a sentire l'ampiezza del mio mondo immagi¬ 
nario, posso vedermi in vari scenari, sentire la sabbia scottante sotto i piedi ed il sole 
sul collo, o dipingermi il fiume ruggente distendersi come un mare che pulsa fino 
all'orizzonte. La foresta con i suoi piccoli abitanti alieni, la città desolata e scolpita dal 
vento, le umide profondità dell’oscuro interno del tempio alieno - è tutto qui! 
lo amo la fantascienza, amo le terrificanti copertine che ornano molti libri e riviste del 
genere, la mia mente si libra fuori dell’esistenza quotidiana, in un mondo di emozioni e 
fantasia, dove posso disfarmi liberamente dei miei limiti e delle necessità, e volarmene 
via. 

Se non altro lo scrivere questo programma mi ha permesso di vivere un po' di più, in 
questi ultimi pochi mesi, in un mondo che visito così poco, ma che non perderò mai 
più. 




CAPITOLO 10 

PRENDIAMOLO PROPRIO ORA! 


Come in tutte le buone Adventure è venuta l'ora di iniziare a manipolare i nostri oggetti 
e il nostro eroe del mondo immaginario dello spazio profondo. L'arte di prelevare o di 
raccogliere oggetti o di lasciarli cadere, è stata spiegata nel Capitolo 3, quindi adesso 
tornerò solo a scorrere velocemente le tecniche di programmazione. 

Una delle regole d’oro nel fare Adventure è quella di raccogliere sempre un oggetto 
non appena lo si vede. Quindi, quando studiate sempre più in profondità il tracciato, 
iniziate col caricarvi di un armamentario variamente assortito. Ho voluto render la vita 
un po’ difficile mettendo alcuni oggetti inaccessibili senza prima aver acquisito altri 
oggetti - per esempio il coltello in Locazione 64 non può essere raggiunto senza prima 
aver “preso” la corda in Locazione 15. Altrimenti non potete sfuggire alle sabbie mobili 
in Locazione 67. 

Un altro modo di render la vita difficile è quello di definire un numero massimo di oggetti 
che potete trasportare nello stesso tempo, cosa che tratterò nel Modulo 10.3. Ma 
torniamo alla tastiera. 

L’Airlock e altre cose 

Ho voluto aggiungere un piccolo particolare in più, quando usciamo dall'arilock (Cabina 
di decompressione): usando suono e immagini si ha l’impressione che la airlock si apra 
veramente. In verità i puristi potrebbero obiettare che essa si dovrebbe aprire due volte 
per essere una vera airlock, ma come per l’uso del rumore nella sequenza di avanzamen¬ 
to nello spazio della navicella, la mia airlock si apre solo una volta (per risparmiare 
tempo). 


MODULO 10.1 

1 9oto3 

2 £.3ive " @0 : m 10.1 % 8 : ver i f y " ri 10.1 ", 8 : stop 

3 rem 

6540 ifi$= "ri"ori ì= "e"ori$="s"ori$= 11 o"thè 

ì'i7070 

6550 i f i t -" i " or l ef t$ < i $, 3 )=" i nv " then 1 000 

0 

6570 i f i $= " i struz i ori i " therv9osu.b 15000 
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6580 i f 1 $= " corr 1 " or i $= " c ?.mm i ri.?. " th<=iì9osu.b 

18000 : Pr int"*3uale ■■vi.?.?" •'9oto4320 

6590 i f i $= " aP r ì •?. i r l ock " andP =57then7100 

6700 ìfì$="apri airiock"andP=5Sthen71@0 

6840 x f x $= " save " ther. 17000 

6850 x f x $ ="escì"ori $= "fine"then9oto17500 

7000 x f ì IO " n " and i IO " e " and i IO " s " and i $< 

>"o"then7300 

7840 rem** 

7050 rem airi ock'"cabina - camera decomPr 
essione> 

7060 rem** 

7070 ifP =58andi $=" o"then?1 00 
7080 ifP =57andi $="e" then71 00 
7090 9oto7200 

7100 Print"3Efei apre la cabina..." 

7110 f'or l =0to24 ^ p ok esc+1, 0 ; next l 
7120 P ok evo .■ 15 : P ok e a \ > 17 P ok e a 2.. 17 • p ok es 
1,130 Pokes2,130 

7130 P ok e 0 . 1 1, 17 : P ok ew2 , 17 : P ok eh 1,13 : P ok e l 

1 > r 8 ■ P ok eh2 .• 253 ■ F* ok e 12 .■ 46 

7140 f o r t = 11 o 15 0 0 : n e x 11 : P o k e v o .■ 0 : P r i n t ' ' 

" : rem 20 sPazi 

7150 f' o r t = 11 o 7 0 0 : n e x 11 : P r i n t ' ' Sla i r l o c k a F' 
erta." 

7160 f'ort=11o700 : nextt : 9oto7200 

7240 xf leftf <i$, 8 > = "a.Pr 1 a 1 r "andP-57then 

P 2=P + 1 : 90S'J.b 18000 : 9oto4010 

7250 i f 1. et"t % \ i $ .■ 8 > = " aP r i a i r " andP =58then 

P 2=P ~ 1 : 9osub 18000 •' 9oto401 0 


Linea 6540; Questa Linea è un by-pass per tutti i comandi 1$ che programmeremo più 
avanti. Quello che fa è mandare il programma alla sezione di movimento evitando così 
ogni “messaggio di errore”, ecc. conseguente ad una ripetizione di 1$. Questo risulterà 
più ovvio in seguito nella programmazione (oppure potete andare direttamente al 
programma finito - vedi Appendice D - per vedere cosa intendo dire). 

Linee 6550-6580: Alcuni comandi 1$ che ho messo qui. 

Linee 6690-6700; Sebbene possiate muovervi facilmente aH’interno della nave spaziale 
e possiate anche uscirne dando un comando EST o OVEST, qualcuno potrebbe battere 
“APRI AIRLOCK", e mi sembra opportuno occuparmi anche di questi. Allora queste 
due Linee inviano il programma alla Linea 7100 che è la routine che apre la airlock 
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(notate, a condizione che siate nelle Locazione 57 o 58 - le Locazioni interessate). Se 
voi battete "APRI AIRLOCK” in qualunque altra Locazione esce una risposta standard. 

Linee 6840-6850: Vengono considerati i comandi SAVE e ESCI 

Linea 7000: Questa Linea manda il programma dopo l'area del movimento, se non è 
stata battuta nessuna direzione. Ci risparmia di doverci preoccupare di risposte come 
"NON PUOI ANDARE IN QUESTA DIREZIONE" nell'area dei movimenti. 

Se cominciate a non raccapezzarvi sulle varie sezioni del programma, il Diagramma 
di flusso 10.1 vi aiuterà a chiarirvi dove siamo a questo stadio. 

Linee 7070-7250: Questa sezione è una simulazione visiva e sonora dell'apertura della 
airlock. Appena voi battete O o APRI AIRLOK il 64 calcola in quale direzione state 
andando (Linee 7070 e 7080), e stampa le parole "si apre lairlock...". 

Nello stesso momento si sente un suono ronzante (Linee 7110-7130). Come il ronzio 
finisce le parole “si apre l’airlock..." vengono cancellate (Linea 7140 - notate i 20 spazi 
per coprire le parole). C'è una breve pausa e quindi viene stampato "airlock aperta...” 
a rimpiazzare il messaggio originale (Linee 7150 e 7160. 

Alla fine appare la prossima Locazione (Linee 7340 e 7250). Queste ultime due Linee 
operano al posto del comando ON... GOTO nel Modulo 9.2. 

Prova del Modulo IO. 1 

Fate girare il programma, e quindi raggiungete la prossima Locazione, battete O per 
entrare dentro la airlock. Ora battete APRI AIRLOCK, e dovreste vedere apparire la 
parola e sentire il delizioso ronzio della porta che si apre. Devo confessare che ottenere 
questo suono particolare mi ha preso alcune ore di tentativi e di errori, ma ne è valso 
la pena. 

Potete ora tornare indietro nella nave battendo E o APRI AIRLOCK di nuovo. Ancora 
le parole e il ronzio accompagneranno il vostro movimento. 

Non c’è molto altro che voi possiate ancora fare con questo Modulo, eccetto battere 
CORRI o CAMMINA per ottenere la risposta. Se battete SAVE, lo schermo si dovrebbe 
sbiancare e dovrebbe apparire un messaggio "SIETE SICURI?”. Se volete vedere se 
avete introdotto correttamente la routine SAVE nel Modulo 7.2, allora date pure il SAVE 
in questo stadio. Per completare il test rigirate il programma e questa volta date il LOAD 
(caricatelo da nastro cioè). Dovrebbe andare tutto. 
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INIZ1ALIZZA 
LE VARIABILI 



Flowchart 10.1 La struttura di base di II pianeta deirincubo 
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Stringhe e altre cose 

MODULO 10.2 


1 9 O t. O 3 

2 " @0 ; fiodu. 1 o 10.2 "8 : ver i f'y " modo. 1 o 1 1 » 
2 ".-8 stop 


3 rem 


7280 

rem cer 

C3 U 

no sp a 

zio S 

U. i :f 

7290 

rem## 





7300 

fori = 1t 

ol en 

< it> 



7310 

it'mid$< 

i$, i 

, 1>=" 

"t.hen 

7340 

7320 

nexti 





7330 

Pr int "SFote 

te usa 

re du 

e P arole" ; 9os 

ub19000 : 9oto 

5000 




7340 

f ori = 1t 

o 1 e n 

< i :f > 



7350 

Ì fhi i df < 

i $ .■ i 

•“ ’-j _ 1! 

"thè 

n7380 

7360 

nextsP 





7390 

p r i nt " ?! 

So 1 o 

'Sli.i T'O “•? 

! SP-3.Z 

io tra. Parole 

" 9o = 

:.IJ. b 1 9000 

: 9ot 

05000 



7390 

rem## 





7400 

rem i $— 

ve$& 

TlO$ 



7410 

rem## 





7420 

forsP-P 

i + lt 

o 1 en ( x 



7430 

ifmid$< 

ii 

, 1> = " 

"the-n 

7450 

7450 

ve$=lef 

t.*a 

$,sP-l 

’ì 


7460 

no$=r i 9 

ht t< 

i$,<le 

Ti(Ì$) 

-SP > > 


Linee 7300-7330: Queste Linee sono un'esatta copia del Modulo 1.5 nel Capitolo 3, 
quindi ripeterò solamente che esse sono qui per vedere se il giocatore ha battuto due 
parole, e se no, allora appare il messaggio "POTETE USARE DUE PAROLE PER 
FAVORE?”. 

Linee 7340-7380: Estendendo il concetto precedente, questa sequenza controlla se ci 
sono due spazi tra le parole (dato che questo impedisce al 64 di riconoscere le parole 
appropriate). Questa volta il messaggio è “LASCIATE UN SOLO SPAZIO TRA LE 
PAROLE PER FAVORE”. Il principio del riconoscimento di due spazi utilizzando la 
funzione MID$, è lo stesso che per riconoscerne uno. 

Linee 7420-7640: E ancora una volta questa routine è una copia esatta del Modulo 1.6 
nel Capitolo 6. 1$ viene separato in VE$ e NO$ (verbo e nome). 

Per capire meglio il principio della, gestione delle stringhe suggerisco di vedere il Flow- 
Chart 10.2. 
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♦ Sl 


METTI IS 
IN VE$ 

E N0$ 


* 



♦ 


VAI ALLA 
SEZIONE 
APPROPRIATA 


Flowchart 10.2 


Prova del Modulo 10.2 


Questo è abbastanza facile da provare. 

Una volta che siete in qualche Locazione battete “VAICAVALLO” per esempio, e 
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dovrebbe apparire il messaggio "USATE DUE PAROLE PER FAVORE". Adesso battete 
“VAI CAVALLO” (con due spazi) e dovrebbe apparire il messaggio appropriato. 
Finalmente battete “VAI CAVALLO” (il messagio corretto) e, dato che verrà riconosciuto 
valido, il programma andrà alla routine delle istruzioni. Una volta fatto ciò, verrete fermati 
con un messaggio di errore. Adesso potete battere PRINTVES in modo diretto e dovreste 
vedere “VAI”, mentre se battete PRINTNOS dovreste vedere "CAVALLO”. Se ciò non 
succede, tornate indietro e controllate le vostre Linee dato che avrete fatto senz'altro 
un errore di sintassi o nelle parentesi. 


Stiamo raccogliendo un po’ troppo! 

MODULO 10.3 

1 goto 3 

2 save " @9 : modu. 1 o 10.3 ", 3 : ver i f y " modo l o 10. 
3" ,8 : stop 

3 reni 

7470 rern** 

7480 refi ve# 

7438 rem** 

7568 i fve$= " trova " then9osu 18000 : p r i nt " :ID 
ovete guardare in 9irò." : 9oto5006 
7610 i f ve#= 11 p rend i " orve#= " a +*ferra 11 orve#= 
"acchiaP Pa"orve$="Por ta"then11700 
9970 rem** 

9980 r e m i n v e n t a r i o 
9990 rem** 

10000 P r i nt : P r i rit " 1 y i riventar i o e " : : i v= 
0 

10010 tori=lto3 

10020 i f ob?i C i ') 1 thenP r i nt " Si" ob$ < i ) : 9osu. 

b18009 : iv=iv+1 
10030 nexti 

10840 i f i v=0theriP r i rit " SII i ente - sPi acerit 

« il 
K u 

1 0050 9O t o5000 
11670 rem** 

11680 rem 9et 
11690 rem** 

11700 for i = 1 to9 i fob# C i > = no#theri 11749 
11710 nexti 

11730 i f ob$ ( i > One#then 11850 

11740 i fob"; < i > =-1 thenP r i nt " ALo avete 9 i a 
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! I " : 9C3Ub19000 : 9oto5000 

11800 i fob/J < i > OP the np r i nt " l^lo n vedo " ; n 
o$ ; " qij i. " 9osub 1 9000 : 9ot-o5000 
11810 i f 9 ■ 4t h e n P r i n t ' ' WS t a t e r a eco 91 i e n d o 
troppo - " 

11820 if9>4thenpririt"Dovete lasciare 4u.a 
Icosa ! 1 " 9osu.b 19000 : 9oto5000 
11830 P r i nt " IJOk aa. " : 9o*u.b 18000 : ob’i < i >=■-1 
: 9=9+1 

11840 9oto5000 

11850 9osub 18000 : P r i nt " ?Horì vo91 i o secca 
r-rni con tale ", nS ; " ! ! ” 9oto5000 

Linea 7560: Uno dei problemi che si devono superare nell’Adventure è quello di cercare 
di anticipare i diversi Comandi che la gente può usare. TROVA sembrava uno di quelli 
alquanto comuni (infatti io ho avuto persino un giocatore che ha battuto “TROVA 
PRINCIPESSA” come primo Comando, proprio all’inizio del gioco, come se il computer 
avesse dovuto rispondere dov’era!!!). Quindi ho aggiunto questa Linea per tener conto 
di tutti i potenziali “trovatori”. 

Linea 7610: Questo è il Comando che ci abilita a prendere i nostri oggetti. Notate che 
ho anche aggiunto “afferra ”, “acchiappa”, “porta" (sinonimi di “prendi") a questo 
Comando. 

Linee 10000-10050: Una routine standard per l'Inventario come nel Capitolo 3. (Modulo 
1.7). L’unica aggiunta è che c’è un suono (beep) che accompagna ciascun oggetto, 
quando viene mostrato. 

Notate che non ho messo suoni quando viene stampato “NIENTE". Questo è abbastan¬ 
za d’effetto dato che il giocatore aspetta i suoni che accompagnano ciascun Messaggio, 
e, se non sente niente, guarda per vedere il perché. Ci sono volte che il silenzio fa più 
effetto del rumore. 

Linee 11700-11840: La routine PRENDI, di nuovo come nel Capitolo 3. Notate tuttavia 
l'aggiunta di un paio di Linee (11810 e 11820) che permettono alla variabile G di arrivare 
a cinque oggetti nell’Inventario prima di provocare "STAI TRASPORTANDO TROPPO”. 
Linea 11850: La risposta standard al tentativo di prendere un oggetto che non é nei 
dati e quindi considerato non valido. 

Prova del Modulo 10.3 

Provate a battere “Inventario" una volta che siete nel programma, allo scopo di avere 
la risposta “NIENTE ". Quindi se cominciate ad andare in giro a prendere oggetti, 
dovreste poterli ritrovare nell’Inventario in qualunque momento lo chiediate. 

Potete anche eccedere, e allora con un simpatico richiamo non vi verrà permesso di 
prendere nient’altro. 

Ora che cominciate a dovervi muovere nell'Adventure per provare ciascun Modulo, 
potete trovare più semplice salvare il programma su nastro per poi ricaricarlo subito 
all’inizio di ciascun test. 

Avendo raccolto una quantità di oggetti, dobbiamo esser capaci di lasciarli; il prossimo 
Modulo descriverà come farlo. 
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Lasciar cadere di nuovo 


MODULO 10.4 

1 9ot.o 3 

2 save " 80 : modo. 1 o 19.4 ".. 8 : ver i f y " rnodu. 1 o 19 „ 
4",8 : stop 

3 rem 

7620 ifve$= "esaròi na"then9osu.b 18900 : 9oto7 
829 

7639 i fve t~ "butta "orvei'= "perdi "orve$= " 1 a 

seia"orve$="to9li"then12009 

7729 ifvet="getta"thengosub18099 : 9oto786 

5 

7829 i fP=25and 1 ef iS <no$. a = " p 0 rt " thenP r i 
ut"Iso1o un Palazzo vuoto. : 9oto5000 

7830 i f P =28andno:£= " 1 a9o " thenP r i nt " li I cr 
i sta 11 o e ' P roP r i o q li. i " • 9oto50010 

7849 i. f ‘ p = 3 7 a ti d n o t ~"c e s P u 91 i o " t h en P r i n t 11 1 
Le noci sembrano buone■" : 9ot05999 
7859 ifP=37and1 efi* <no t ,5 > = "frutt"thenP r 
int "-ISembrano comrnest ibi 1 i. " : 9oto5000 
7869 Pr int 1 'Hon ce ' nu 11 a di utile qui. 
":9oto5000 

7865 i f'not= " victor " thenhr■=2 : 9oto 11300 
7879 f or ì-l to9 : i f ob$ *•' i > — no$the n9oto7900 
7889 nexti 

7899 Print "IBroett i la di Perder tempo!!" 1 
9 O t O5000 

7909 i t ‘ o b " i l i ) — — 11 fi e- n p r i n t ' ' l o n P' o t e t e v e 
dere molto qui ! ! 11 9oto 12099 
7919 P r i nt " j#lon 1 " avete ! : 9oto5000 
11970 rem**' 

11980 rem butta 
11990 rem** 

12900 f or i = 1 to9 : i f obt ( i > =no$t.hen 12949 
12010 nexti 

12030 ifob$(i> Ono$thenyosub18900 : P rint" 
Nessun Punto li''. 11 : 9osub5000 
12940 ì f ob'/. ■:! i ) O-1 thenP r i nt " allori 1 avete 
ancora!! !" ; 9osub19909 : 9oto5090 
129801 P r i nt " BS.Jk a.y. " : ,9osub 18090 
12990 ob’ÌL i >=P : 9=9-1 : 9 o to50i0i£t 
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Linee 7620 e 7820-7860: Uno dei Comandi che la gente usa spesso nell'Adventure è 
ESAMINA La Linea 7620 accetta questo Comando e manda il programma alla Linea 
7820 dove vengono dati alcuni Messaggi. Avevo deciso di non coinvolgermi troppo nel 
problema di "esaminare” oggetti, perché avevo già abbastanza di che occuparmi. 

Linee 7820-7850: Queste linee sono connesse con alcune Locazioni (dove immaginavo 
che qualcuno potesse provare a inserire “ESAMINA" qualcosa) e dà i Messaggi alle 
porte della città (notate LEFT$ (NO,4)=“PORT"), al lago, e per i frutti e le noci nel 
deserto. Avrei potuto espandere questa Sezione finché avessi voluto, ma lascio a voi 
farlo, quando avrete finito, e saprete allora quanta memoria vi rimane! 

Linea 7860: È l'ultima della serie che dà il Messaggio “NIENTE DI UTILE QUI" se il 
giocatore prova ad "esaminare" qualche cosa d’altro. 

Linea 7630:1 Comandi BUTTA, PERDI, LASCIA, TOGLI attiveranno la routine “BUTTA". 
La possibilità di avere diverse scelte per questo Comando è utile perché mentre 
qualcuno potrebbe facilmente usare BUTTA, per un coltello, è più verosimile che usi 
TOGLITI, per la tuta spaziale o LASCIA, per Aurora, e quindi aggiungendo queste 
parole in più si rende più versatile il gioco. 

Linee 7720-7910: Queste Linee formano una piccola routine che si occupa del Comando 
LANCIA. 

Ho deciso che dovevo occuparmene per le stesse ragioni della routine “butta”, infatti 
se lanciate un oggetto vi aspettate che non si trovi più nell’Inventario. Quindi diventa 
necessario controllare se l’oggetto che viene lanciato è un oggetto valido (Linee 7870- 
7880) e se l’oggetto è o no nell'Inventario (Linea 7870). Se si, il programma va alla 
Linea opportuna (Linea 7900) e stampa il Messaggio “NON POTETE VEDERE MOLTO 
QUI”, così il giocatore sa che non è riuscito in nient’altro. 

A questo stadio andiamo alla 12090, dove gli oggetti possono uscire dall’Inventario ed 
entrare nella Locazione (vedi la routine “butta"). 

Se l'oggetto non è nell’Inventario, allora la Linea 7910 stampa “NON L’AVETE 
La Linea 7890 è una Linea di base per ogni altro oggetto che possa essere lanciato, 
es. “LANCIA CAVALLO”. La gente può scrivere le cose più pazze in un gioco d’Adventu- 
re (sono sicuro che lo sapevate), quindi abbiamo bisogno di messaggi che considerino 
sia i commenti stravaganti che i genuini tentativi di lanciare un oggetto che è citato nella 
descrizione ma che non è un oggetto valido (per es. il vasellame nella Locazione 92). 
Quindi un Messaggio "NON LO VEDO QUI" sarebbe inaccurato dato che il vasellame 
è ovviamente qui. Ho pensato che “SMETTETELA DI DIRE SCIOCCHEZZE" fosse un 
buon compromesso. 

Finalmente la Linea 7865 è una Linea che ho aggiunto in seguito per considerare il 
fatto che qualcuno poteva pensare di lanciare Victor. Se lo fate, andate al Modulo 14.1 
(Linea 11300) dove vi troverete una bella sorpresa. 

Linea 12000-12090: È la Sezione “butta" standard come nel Capitolo 3. Niente da 
aggiungere qui, eccetto che dobbiamo ricordarci di togliere oggetti (G=G-1) nella linea 
12090 per permettere al giocatore di prenderne altri se è vicino al limite. 
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Allora volete finire? 


MODULO 10.5 
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Linea 17500: Lo schermo diventa rosso, per conferire aspetto il dramma. 

Linee 17510-17550: Questa Sezione controlla che voi vogliate veramente lasciare il 
gioco. Se è così il programma andrà alla Linea 17570. 

Linea 17560: Se premete E lo schermo torna al familiare grigio e si pulisce, e voi tornate 
all’inizio del gioco. 

Linea 17570: Questa è la reazione al vostro ESCI, e fa tre cose. Per prima cosa pulisce 
lo schermo. Quindi c’è una POKE 53272,21 per riconvertire in caratteri maiuscoli. Infine 
lo schermo tornerà ai familiari colori blu scuro e blu chiaro del 64. Il Programma finisce 
col computer che appare come dovrebbe, dopo aver terminato un gioco. 

Prova dei Moduli 10.4 e 10.5 

Per provare questi Moduli dovete passare da tutte le possibili combinazioni di Comando 
che potete pensare. Dopo essere entrati nel gioco dovete: 

1. Esaminare qualcosa (in qualunque Locazione). 

2. Buttare via un oggetto che avete'preso precedentemente. 

3. Uscire e rientrare in una Locazione per vedere se l’oggetto è mostrato sullo schermo. 
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4. Buttar via un oggetto valido che non avete preso. 

5. Buttar via un oggetto non valido (come un sasso). 

6. Guardare il vostro inventario ad ogni stadio. 

7. Provare a dare ESCI o FINE e provare poi a continuare (C) o terminare veramente 
(Q). 

Dovreste riuscire a fare tutte queste cose ed avere le risposte corrette con un beep o 
un rumore. La struttura standard del gioco è quasi finita adesso, ed è ora di pensare 
ad aggiungere un po' di pericoli e di emozioni nella vostra storia. 

Sommario 

La maggior parte di questo Capitolo è stato un sommario della programmazione originale 
nella Parte 1 di questo libro e perciò sono stato alquanto schematico. È abbastanza 
interessante notare come ho sviluppato alcuni Moduli per aggiungere una vena di 
sofisticatezza a II Pianeta Dell'lncubo. Spero che ciò vi dia delle idee che possano 
essere utili per la vostra Adventure. 
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CAPITOLO 11 

NON PER QUELLA VIA 


II Pianeta dell'lncubo contiene solo sei pericoli di base - non tanti come potreste 
immaginare. Ma la programmazione di questi soli sei pericoli mi ha dato la prova di 
essere la più frustrante e la maggior perdita di tempo di tutto il gioco. Quindi quando 
batterete le linee dei prossimi comandi, pensate un pochino allo sforzo che ho dedicato 
ad eseguire ciò che sembrerà essere una parte relativamente piccola dell’intero program¬ 
ma. Quando iniziate a pensare ai pericoli del vostro gioco è meglio essere cauti all'inizio, 
perché potete sempre aggiungere qualcosa in un momento successivo, se il tempo, la 
memoria e la salute ve lo consentiranno. 

I sei pericoli di base sono: 

1. Un serpente nella Locazione 24 che metterà in pericolo la vostra vita. 

2. L'anguilla sott'acqua nella Locazione 28 che farà lo stesso. 

3. L'atmosfera velenosa che vi ucciderà se non avete la tuta spaziale. 

4. Le sabbie mobili nella palude nella Locazione 67 che vi inghiottiranno finché non 
morirete. 

5. Un dinosauro nella Locazione 57 che vi impedirà di andare verso sud finché non 
avrete risolto il problema di come passare. 

6. Gli indigeni ostili nella Locazione 92 che vi impediscono di portare via Aurora. 

Oltre ai sei ovvi pericoli ve ne sono altri di minore entità, maggiormente in relazione 
con l’obiettivo finale di vincere il gioco. Questi sono: 

1. Il fatto che non potete scappare dal pianeta senza Aurora. 

2. Potete scappare con Aurora solo se la baciate (dopo che l’avete trovata). 

3. Non potete baciare Aurora senza togliervi la tuta spaziale - nonostante l’atmosfera 
velenosa. 

4. Dovete mangiare le noci nella Locazione 37 per essere in grado di togliervi la tuta 
spaziale in sicurezza - notate l’indizio nella Locazione 2. 

5. Il fatto che il cristallo di energia dell'astronave è stato perso e dovete ritrovarlo per 
scappare dal pianeta. 

6. Non potete immergervi nell’acqua del lago (per prendere il cristallo) a meno che non 
abbiate qualcosa di 'pesante’ per immergervi (questo è il rottame nella Locazione 47).7. 
Se non avete la tuta spaziale, non appena vi immergete in profondità affogate. 

8. Dato che il vostro mitra non funziona sott’acqua, potete uccidere l’anguilla solo col 
coltello (trovato nella Locazione 69). 

9. Per prendere il coltello dovete attraversare le sabbie mobili nella Locazione 67 - e 
non uscirete di lì se non avete la corda (trovata nella Locazione 15). 

10. Potete uccidere il serpente solo con il mitra. 

11. Non potete uccidere il dinosauro e dovete scalare un albero per oltrepassarlo 
dondolandovi di albero in albero. 
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Come vedete dalla seconda lista, i sei pericoli originali hanno creato un bel po’ di 
programmazione. Per mettervi in grado di capire come ho sviluppato l'idea e per aiutarvi 
a sviluppare la vostra, ho provato nell Adventure a collegare diversi oggetti con diversi 
pericoli, ed a rendere abbastanza difficile trovare la giusta strada. 

L’uso delle variabili. 

Una delle prime cose da considerare è quella di programmare il 64 in modo che il 
pericolo appaia quando lo incontrate la prima volta - ma dovete anche fare in modo di 
nasconderlo nel caso che torniate alla stessa Locazione in un momento successivo. 
Ho realizzato ciò impostando un certo numero di variabili a 0 (Linea 290 nel programma - 
Modulo 6.1) e quindi una volta che i pericoli sono stati superati, impostando la variabile 
a 2. Questo principio è stato spiegato nel Capitolo 4 - l’unica differenza qui è che ci 
sono un numero maggiore di variabili. 


Tabella delle Variabili per i Pericoli. 


PR 

impostato a 2 

CV 

impostato a 2 

SV 

impostato a 2 

EV 

impostato a 2 

QV 

impostato a 2 

DV 

impostato a 2 

NV 

impostato a 2 

FV 

impostato a 2 

ES 

impostato a 2 


impostato a 1 

NP 

impostato a 1 

NA 

impostato a 1 

Z 

impostato a 1 

RE 

impostato a 2 

HH 

impostato a 2 

WW 

impostato a 1 

H 

impostato a 2 


quando la Principessa è salvata. 

quando il Cristallo è trovato. 

quando il Serpente è stato ucciso. 

quando l’Anguilla è stata uccisa. 

quando le Sabbie Mobili sono state superate. 

quando il Dinosauro è stato oltrepassato. 

quando gli Indigeni sono diventati amici. 

quando le Noci sono state mangiate. 

quando l’Anguilla è stata uccisa; 

quando l'Anguilla vi ha impedito i movimenti. 

quando siete arrivati alla capanna una volta. 

per permettervi il movimento dalla capanna. 

quando le noci sono state mangiate. 

per impedire il movimento dal lago. 

quando Aurora è sulla nave. 

per la prova dell’Anguilla. 

quando Victor non vi può aiutare. 


I valori che ho deciso per queste variabili sono alquanto arbitrari perché li ho creati 
lungo la strada, e a volte ho scelto 1, altre volte 2. La maggior parte delle variabili viene 
impostata a 0 all’inizio del programma (Linea 290 di nuovo), il che significa che la prima 
volta il pericolo sarà operativo. 


Ci sembra di avere un problema. 

Possiamo ora tornare alla tastiera e programmare di nuovo. Il primo obiettivo è quello 
di far apparire i pericoli sullo schermo quando il giocatore introduce la Locazione 
appropriata. 

Il Diagramma di Flusso 11.1 illustra il principio dei Moduli 9.2 e 11.1. 
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MODULO 11.1 


1 9oto 3 

J save " 00 : Fi od li. Ioli. 1 " , 8 : ver i f y " rnodu. 1 o 11 . 
1 ", 8 : ?■ top 
3 r e fi 

4170 rem** 

4188 rem Punta ai Pericoli 
4190 rem*# 

4200 i fP =24andsv<>2theri9oto30000 
4210 i fP =28andevO2theri9osub30500 
4220 i fP =57andfv<>2andob?i < 6 ) O-1 thenQoto 
3 1 000 

4230 i fP =53andob?i < 2 > O-1 then9osub32000 
4240 i fP =59andP rO2then9osu.b33240 
4250 i fP =67and4 vO2then9oto32600 
4260 i fp =74anddv02then9oto32700 
4270 i fP =92andnv02andP =0then9oto33000 
4280 i fP =92andnv02andP = 1 then9oto33060 
29970 rem** 

29980 rem serPente 
29990 rem** 

30000 Print" «Fuori le rovine striscia un 
9i9antesco serpente - il corpo 
30010 Print"9rosso il doPPio del vostro. 

V i b 1 occa L un i ca use i ta. " : 9oto500@ 
30470 rem** 

30480 rem an9ui11a 
30490 rem** 

30500 P rint"SE' mo1to P rofonda ne11'aclu 
a." : return 
30970 rem** 

30980 rem aria venefica 
30990 rem** 

31000 Pr int" Sii 1 1 iFiProvviso vi sent ite s 
offocare. L ' atmosfera " 

31010 Print"e' velenosa. Se non farete n 
ulla morrete Presto..." 

31030 form=1to5000 : nextm 
31040 p r i nt " ;!3om i nc i ate a P ensare a " ; n$ 

: Print: 

31050 for1=0to24 : Pokesc+1> 0 : next1 
31060 for i =0to30P r i'nt "* " ; 





Flowchart 11.1 Stampa di oggetti e pericoli 
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31070 p ok evo .■ 15 : P ok ea 1 .■ 41 : P ok es 1 .• 89 ; P ok e 
w 1 .■ 17 : P ok eh 1.. 56 : P k eli j 99 
31080 fort= 1 to200 : nextt ; p ok evo > 0 : P ok e ?. 1 .■ 
0 • P ok ew 1 .* 0 : P ok es 1 .> 0 
31090 Ti ex ti 

3lì00 Print ehr$(13)0"BETTroPPo tar di ! ! " : 
Prini"troppo tardi ! ! : voto190 
31970 reni#* 

31980 reni cr i sta 11 o 
31990 reni** 

32000 Print"liNotate che il cristallo e' 
sparito dalla teca energetica. 

32010 Privit"Senza di esso la nave non Pu 
o' volare! ! Deve averlo. Preso 11 .; 

32020 Print "9u.alcij.no ! Dovete trovarlo Pr 
ima che scappi. 

32030 return 
32570 reni** 

32530 reni sabbie mobili 
32590 rem** 

32600 Print"Smistate sprofondando nelle 
sabbie mobili, in breve vi sono alle ") 
32610 P rint"9inocchia.Bisogna far 9 ualco 
jj M 11 : q =0 : 9oto5000 
32670 rem** 

32680 rem dinosauro 
32690 rem** 

32700 Print"SUn colossale dinosauro esce 
da.9li alberi e vi taglia la strada. "; 
32710 Print"Non Potete Passare." : 9oto500 
0 

32970 rem** 

32980 rem indigeni 
32990 rem** 

33000 Print"Suna folla di indigeni ostil 
i appare all ingresso della. 

33010 Print"capanna - bloccando la via. 
Avanzano Puntandovi le lance alla 
33020 Print"gola. Vogliono occuparsi di 
" .* Tif ■ 9=0 • 9oto5000 
33030 rem** 

33040 rem ancora alla capanna 
33050 rem** 
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33060 Pr ini "ai ridi etro ancora 1 ! Spero che 
abbiate Pensato a come dare ad "> 

33070 Print"aurora il bacio che vi aiate 
ra■' a Portarla vi a di 3ai 1 1 " 

33030 fia=0 q=0 9oto5000 
33210 rerntt 

33220 rem niente aurora 
33230 rernt* 

33240 Print"SiF'erduta aurora non Potete- 
rr.mP 1 et are 1 a mi ss-ione. " : retur n 


Linee 4200-4280: Questa sezione del programma è dedicata alla parte che scriverà gli 
appropriati messaggi di errore. Quindi nella Linea 4200, se siete nella Locazione 24 (la 
città) e SV non è uguale a 2 (cioè non è la prima volta che si passa di lì, dato che 
l’abbiamo messa a 0 all'inizio del programma), allora andate alla linea 3000, che scriverà 
il messaggio “UN SERPENTE STA PER ACCHIAPPARVI’’ o qualcosa di simile. 

Una volta che avete eliminato il serpente la variabile SV viene riportata a 2 - così se 
dovrete tornare alla Locazione 24 il serpente non apparirà più. Le altre condizioni, 
naturalmente, si riferiscono ad un’altra Locazione. 

Linea 4220: È un esempio di condizione AND. Se lasciate la nave spaziale “AND" FV 
non è 2 (in altre parole, se non avete mangiato le noci) AND OB (6) non è - 1 (in altre 
parole non avete la tuta spaziale nell’Inventario) allora arriverete alla parte del program¬ 
ma che dirà “ATMOSFERA VELENOSA”. 

Le Linee 4230 e 4240 si riferiscono entrambe ad Aurora ed al cristallo - una parte 
alquanto complicata di programmazione a cui tornerò nel Modulo 13.1. 

Linee 4270-4280: Se siete nella capanna degli indigeni per la prima volta, allora NV = 
0 così gli indigeni vi minacceranno e vi impediranno di prendere Aurora. Dopo 10 
tentativi vi viene permesso di partire (magari per cercare le noci) ma adesso NP è 
impostato a 1, cosicché quando tornate il messaggio sarà “INDIETRO ANCORA” 
invece del messaggio della prima volta che si arriva. 

Quest'ultima può sembrare una raffinatezza - ma appare molto meglio quando state 
veramente giocando. Infatti quando abbellite il vostro gioco personale, spesso avete 
bisogno di giocare veramente, per trovare questi piccoli tocchi che lo migliorano. 

Per esempio, originariamente avevo un messaggio “NON LO VEDO QUI” in corrispon¬ 
denza a comandi come “LANCIA” se non implicava un oggetto nella matrice degli 
oggetti. Quindi se il giocatore batteva “LANCIA CAVALLO” prima veniva mandato il 
messaggio “NON LO VEDO QUI”. Questo era buono finché il giocatore cercava di 
gettare cose come cavalli o Ford Cortina (in altre parole, cose da pazzi), ma in certe 
Locazioni parliamo di “sassi o vasellame”, che non sono validi oggetti da buttare. Quindi 
se battete LANCIA VASELLAME e avete la risposti “non ne vedo”, tutto ciò suona 
male. La risposta è cambiare da “NON LO VEDO QUI” a “SMETTETELA DI DIRE 
SCEMENZE ”, che risulta valida per qualsiasi oggetto, in entrambe le situazioni. 

Sento a questo punto il bisogno di chiedere scusa per il fatto che, pur scrivendo e 
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riscrivendo, questa parte del libro può sembrare confusa per qualcuno. Questa sezione 
del programma richiede una conoscenza dell’Adventure che è più facile per me (l'autore 
della trama), dal momento che ho vissuto e respirato l’atmosfera del racconto per dei 
mesi, ed ho perduto del tempo per trattare questa parte del programma. Se vi sentite 
un po’ frastornati dalla complessità della trama e dei moduli relativi, potrà consolarvi il 
fatto che tratterò ciascun pericolo in moduli separati, il che renderà più chiara la 
situazione. Per adesso fate affidamento su ciò, e riguardate piuttosto al fatto che questa 
parte del programma creerà le istruzioni PRINT che manderanno i messaggi sullo 
schermo, e poi impedirà al giocatore di fuggire con il semplice spostarsi fuori dalla 
locazione. 

Quando creerete la vostra Adventure, tutto diventerà molto più facile, dal momento che 
avrete definito voi la trama ed i pericoli, ed avrete maggiore familiarità con essi. 

Linee 30000-30010: Messaggio riguardante il serpente. 

Linea 30050: Questa linea si riferisce al solo cristallo. Per il momento abbandono 
l’anguilla, perché richiederà un intero capitolo tutto per sé. 

Linee 31000-31100: Per lasciare il pericolo costituito dall’atmosfera velenosa, ho aggiun¬ 
to dopo un po’ una breve routine che simula il tempo che trascorre prima che siate 
presumibilmente soffocati a morte. Per prima cosa appare il messaggio “STATE 
SOFFOCANDO..." ed il programma ha una pausa (Linea 31030) per darvi il tempo 
di leggerla. Quindi appare un altro messaggio in color porpora: “COMINCIATE A 
PREOCCUPARVI...” ed un asterisco viene stampato nella riga sottostante (Linea 
31040). 

La linea 31050 azzera tutte le variabili relative al suono, poi comincia un ciclo di 
lunghezza 30, nella Linea 31060, contenente un effetto sonoro (Linee 31070 e 31080) 
al suo interno. 

L’effetto è un beep di alta frequenza ogni volta che un appare sullo schermo, e un 
asterisco comincia a spostarsi, aggiungendo altri ’*’ fino a 30. Poi appare il messaggio 
"TROPPO TARDI - TROPPO TARDI", e il programma va alla sezione SIETE MORTO 
(Modulo 11.3 - da aggiungere ancora). 

Non c’è modo di sfuggire a questo pericolo. Una volta incappati nell’atmosfera venefica 
siete condannati. Naturalmente questa routine viene attivata anche se aveste preso la 
tuta spaziale, uscendo la prima volta, ma l’abbiate levata più tardi (per baciare Aurora, 
per. es.), senza prima mangiare le noci. Ma farò queste aggiunte al programma più 
tardi. 

Linee 32000-32020: Messaggio standard per l’interno dell’astronave, se non avete 
trovato il cristallo. 

Linee 32600-32610: Il messaggio per le sabbie mobili. Notate qui Q=0, che setta un 
contatore. In breve questo vi permette un certo numero di tentativi di fuga, prima che 
il gioco sia concluso col messaggio “SIETE AFFOGATO”. 

Linee 32700-32710: Messaggio per il dinosauro. La differenza tra questa sezione e le 
altre è che tutto quello che il dinosauro fa è bloccarvi la strada verso sud - senza in 
effetti uccidervi. 

Linee 33000-33080: Queste due sezioni trattano degli indigeni - la prima volta quando 
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entrate nella Locazione 92, la seconda se non riuscite a liberare Aurora al primo 
tentativo e a tornare con lei. La variabile NA impedisce la fuga dalla capanna finché 
non abbiate tentato 10 volte di liberare Aurora (notate ancora Q=0). 

Linee 33240: l’ultima linea del modulo stampa semplicemente il messaggio della 
Locazione 59 (l’interno dell'astronava) se non avete liberato Aurora. 


Prova del Modulo 11.1 

Per testare questo modulo dovete dare il RUN al programma e cominicare a muovervi 
tra le varie locazioni. La prima cosa che noterete è che partendo col gioco ancora dalla 
prima locazione (la cabina della vostra astronave) vedrete un’intera pagina di testo, 
avendo aggiunto la sezione relativa al cristallo e ad Aurora. NON prendete la mitraglietta 
o la tuta spaziale, ma andate direttamente ad ovest. Uscendo quindi dall’astronave 
dovreste trovare l’atmosfera velenosa, che vi avvelenerà... mentre appaiono gli asterischi 
e voi osservate senza poter intervenire, dal momento che il vostro destino è segnato. 
Terminando questa sezione, dovrebbe apparire il messaggio di errore UNDEF’D STATE¬ 
MENT ERROR IN 31100. 

Ridate ora il RUN, e prendete questa volta la tuta, girando poi per il pianeta. Arrivando 
alle locazioni apposite, dovrebbero essere mostrati i pericoli. Per il momento potete 
fuggire battendo EST o OVEST (o qualsiasi altra cosa) per spostarvi nella sezione 
seguente. Dobbiamo tuttavia impedire che ciò accada nel gioco reale e questo sarà il 
compito del prossimo modulo. 

Nessuna uscita per quella via 

Avete notato come sia stato facile sfuggire ai pericoli, quando avete testato il Modulo 
11.1 - come possiamo impedirlo nel nostro gioco? Molto semplicemente abbiamo 
bisogno di una routine tra l’input ISTRUZIONI e la routine MOVIMENTO. Sarà proprio 
il Modulo 11.2 

MODULO 11.2 

1 9oto 3 

2 save " @0 ■ modu 1 oli. 2 11 .. 8 : ver i f y 11 modi 1 1 n 11 „ 

2",8 ; stoP 

3 rem 


5970 

rem*# 


5380 

rem 'nessuna 

USC Ì 1 3 . 

5390 

rem** 


6000 

i fp=24andsv 

02then6110 

601 0 

i f P =28andes 

=2then6500 

6020 

ifP=28andev 

02then6110 

6030 

i f P ~67arid4 v 

C>2then6110 

6040 

it P—74anddv 

O2then6170 

6050 

ifP=92andnv 

<>2 anda=1 thèn6500 

6060 

ìfp=92andnv 

■O2anda=0then6110 
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6070 9otoS500 

6110 ifi$="n"ori$="e"orif="s"ori$="o"thè 
nyosub19000 ; 9otoS130 
6120 9otoS150 

613 0 P r i n t ' ' -tl o ri P o t e t e f u. 9 9 i r e d i 4 u i ! " '• 
P r i r 1 1 " ?1D o v e t- £■ P 6' ìì £ Aro A " .■ 

6140 P r i Tit " iti uà 1 eoo a 1 tro ! " : 9oto5000 
6150 i f i $— " corr i " the ri9o£ub 1 9000 • P r i nt " Wt'\ 
ori c'e' uscita di 1 i ' • " : 9oto5000 
6160 it if = "cammi na"theìì9osub 19000 : print" 


Non c'e' uscita di li"." ; 9oto5000 
6 170 ifi $- "sud"ori t= "s"then9osub19000 : Pr 
infoiente da fare " .■ ut 
6 180 i f i $= " sud " or i f = " s " thenP r 1 nt " 1C e " u 
vi dinosauro sulla via ! " : 9oto5000 


Linee 6000-6070: queste linee controllano se voi siete in una delle locazioni speciali, e 
se è così il programma sarà indirizzato alla routine IMPEDIRE L'USCITA. Se non ci 
siete allora la Linea 6070 bypassa quella routine. 

Le Linee 6010 e 6050 differiscono di poco, in quanto entrambi alla fine conducono 
all’area NESSUN MOVIMENTO. Nel caso della 6010 il motivo è che ES=2 (significa 
che è la seconda volta che visitate quella locazione). Questo diventerà più chiaro nella 
sezione del pericolo “anguilla". La linea 6050 differisce per il fatto che la variabile NA 
è stata posta a 1 (avete visitato solo una volta quella locazione). Penso che sia meglio 
non porre limiti al numero di volte che si torna a visitare la capanna degli indigeni, per 
liberare Aurora, specialmente se ciò è dovuto al fatto che avete letteralmente dimentica¬ 
to’ di battere “PRENDI AURORA”, dopo che siete riusciti a liberarla, per cui dovete 
tornare indietro a riprenderla. 

Linee 6110-6180: sono semplicemente le diverse risposte ai vari tentativi di sfuggire 
dalla locazione battendo CORRI e CAMMINA. Notate anche le Linee 6170-6180 
impediscono un movimento verso sud per affrontare e superare il dinosauro - mentre 
è ancora possibile andare a nord. 

Linee 190-240: infine questo piccolo modulo costituisce il messaggio terminale nel caso 
si vada incontro ad una soffocante fine, in qualsiasi posto lungo la via. 
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MODULO 11.3 


1 9oto 3 


kL —• ■ 

ave"00 

: moda 1 o 11.3 " 3 : ver i f y " 

modu1 o11 . 

o « , ; 

3 : st op 



3 ri 

eni 



160 

rem## 



170 

rem s 

iete morto 


130 

rem## 



190 

P ok e v 

+21 .■ 0 : P r i ni " iùblLo .ave 

te suPera. 

io 1 

be ne ,, s 

tavoli a ., vero " i n# 


200 

Pr ini 

"SliFer fortuna Posso 

farvi riv 

i vei 

re e r 

imettervi", 


210 

P r i ni 

II 

" al vi a. " : Print"S*ÌIVo 

liete ? (s 

/n .•* 
220 

9etr# 

: i fr$<> "s " a ndrSO " n " ih 

n=ri220 

230 

i f r $= 

"s"thè n2S0 


240 

i f r$= 

"-.-."then 17570 



Prova dei Moduli 11.2 e 11.3 

Se usate la medesima procedura di test del Modulo 11.1, troverete che non potete 
fuggire a lungo, poiché arriverete alla fine ad una locazione con un pericolo. Battendo 
O, per esempio, dovrebbe comparire il messaggio “NON POTETE FUGGIRE PER 
QUELLA VIA - DOVETE PENSARE A QUALCOSA D'ALTRO", (seguito da un burp 
volgare!). Anche se dimenticate la vostra tuta spaziale, non vi si dichiara semplicemente 
morti, ma vi si offre la possibilità di ricominciare a giocare. 

Essendo stati ora illustrati la maggior parte degli elementi del gioco, il Diagramma di 
Flusso 11.2 illustra la struttura di base di un’Adventure. 

Sommario 

Come ho dichiarato prima, questa parte del libro può sembrare probabilmente più 
complicata di quanto è in realtà, ad una prima lettura. Ho tentato di renderla la più 
semplice possibile, ma in realtà solo il sapere ciò che ci aspetta, può essere di vero 
aiuto, e quindi è meglio programmare questa sezione e andare avanti, tornando per 
ulteriori spiegazioni su ciò che sta accadendo, linea per linea, solo quando avrete 
un'idea migliore di come ho affrontato i vari rischi. 

È anche riguardo a questa parte di programmazione, che dovreste diventare consapevoli 
del formidabile potere che avete (come programmatore). Forse non dovrei ripetermi 
ancora, ma non si può negare cheVOI controllate il gioco, VOI decidete dove il giocatore 
può andare, dove può spostarsi, e cosa può fare. Non importa come la pensiate voi, 
ma io trovo tutto ciò molto affascinante. 
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Flowchart 11.2 Adventure di base 
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CAPITOLO 12 


BELLA GIORNATA PER UN TUFFO 


In ogni programma di Adventure degno di tale nome vi troverete a trattare con grossi 
moduli di programma, e se usate il BASIC allora, quando l’intreccio si fa serrato, vi può 
capitare di andare fuori memoria tra i moduli (perché sorgeranno dei problemi non 
previsti). Questo fatto richiede una rinumerazione giudiziosa, ma anche se avete delle 
Utilities potete ugualmente avere dei problemi. 

Avevo trovato che ciò stava succedendo a me, perciò ho escogitato una carta speciale 
(vedi Figura 12.1 ) che mi mette in grado di dare una stima dell’inizio della numerazione 
di ogni specifica routine o modulo. 

E anche essenziale quando si crea un programma con un grosso numero di GOTO e 
GOSUB, poter mettere i numeri di linea man mano che si procede, altrimenti li 
dimenticherete sicuramente - con un supplmento di lavoro nel correre dietro ai vostri 
errori. 

Inoltre vi consiglio di sovrastimare, anche più di quanto immaginate, la vostra numerazio¬ 
ne, senza tener troppo conto dello spazio che lasciate. Per darvi un esempio di come 
ho usato la carta, la Figura 12.2 vi mostra dove siamo arrivati nel programma. 

Uccidetemi delicatamente 

Uno dei comandi sempre presenti negli Adventure deve essere UCCIDI (non consideria¬ 
mo le implicazioni psicologiche...), quindi prima di entrare in una delle sequenze più 
dure del programma - il pericolo costituito dall’anguilla nel lago - dobbiamo entrare nel 
modulo UCCIDI. 


MODULO 12.1 

1 9oto 3 

2 save " 80 = m 12.1 % 8 •* ver i f y " m 12.1 ", 8 : stop 

3 rem 

12270 rem*# 

12280 rem uccidi. 

12290 rem#* 

12300 i f no$= " aurora " fchen9osu.b 19008 : P r i nt 

(segue a pag. 145) 
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TESTA 
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PERICOLO 


( ,3 ° ) 
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PAGINE 
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( 15000 ) 
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( 3700 ) 

Q 16000 ^ 







INPUT 

“ISTRUZIONI” 


LOCAZIONI 


^ 5000 ^ 

( 20000 ) 







IMPEDISCE 

MOVIMENTO 


DESCRIZIONI 

PERICOLI 


( 6000 ^ 

( 30000 ^ 







COMANDI 

1$ 


SPRITE 


( 6500 ) 

( 35000 ^ 







ROUTINE 

DEL 

MOVIMENTO 




( 7200 ^ 

( ) 







COMANDI 

VE$ 




f 7500 ^ 

( ) 
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( ) 











CD 

C ) 




Figura 12.2 Numeri di inizio delle subroutines per II pianeta dell’incubo 
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Flowchart 12.1 


La sfida col pericolo 




(mod. 12.1 seguito) 


"WSta 

te 

scherzati 

do ! ! 

!" : goto190 

12305 

i f P 

=24thenl 

3000 


12310 

ifp 

=28thèni 

2500 


12330 

i f P 

=74thenl 

3500 


12340 

i f P 

=92thèni 

3700 


12350 

9 os 

ub18000 : 

P r i nt 

" BUon vedo 

ni en t 

e da " : ve$ : 

9oto5 

000 


Linea 12300: Mi è capitato che un mattacchione scrivesse “UCCIDI AURORA" solo 
per Dopo la risposta “STAI SCHERZANDO” il programma va alla subroutine alla Linea 
190 (che è la sezione Sei morto!’) e termina il gioco. 

Linea 12305: Questa linea serve nel caso che qualcuno batte “UCCIDI VICTOR” (come 
se si potesse!), e manderà il programma alla sezione di AIUTO dove una simpatica 
sorpresa attende il giocatore (vedi Modulo 14.1). 

Linee 12310-12340: Queste linee fanno riferimento alle sole Locazioni in cui potete 
provare a uccidere qualcosa, e manda il programma alla sezione appropriata (che 
aggiungeremo più tardi). 

Linea 12350: Una risposta standard nel caso cerchiate di uccidere qualcuno in ogni 
altro posto lungo la strada. 

L’anguilla batte in ritirata 

Mi scuso per il titolo di questa sezione - licenza poetica, suppongo. 

Ora possiamo cominciare ad aggiungere tutte quelle perfidie che renderanno la vita più 
interessante per il nostro giocatore. Sono partito con la parte forse più dura dal punto 
di vista della programmazione - così da qui in poi è tutta discesa. 

Quando dico la più dura - non intendo ovviamente riferirmi al fatto di copiare le linee. 
Ma progettare e pianificare questa sezione è stata per me la parte più intricata - e 
magari la più difficile da capire per voi, a causa del numero di variazioni possibili nelle 
risposte che il giocatore può dare (nel tentativo di superare il pericolo che gli abbiamo 
preparato) e nel risultante numero di possibilità che dobbiamo programmare. 

Infatti si sta cercando qui di anticipare tutte le parole che l'Adventurer userà nel suo 
tentativo di fuggire, e ciò vi darà le maggiori preoccupazioni, nel cercare di farli rientrare 
tutti nella vostra Adventure. Qualunque cosa succeda, voi non tratterete mai tutte le 
eventualità, quindi è meglio accettare questo fatto fin dall'inizio. 

Vediamo come ho progettato il trattamento di ogni possibile pericolo nel Flow-Chart 

12 . 1 . 
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Flowchart 12.2 II pericolo dell'anguilla 










Probabilmente la maniera più facile per capirlo è quella di percorrere il flowchart ponendo 
domande al computer o dandogli dei comandi - come segue: 

DOMANDA 1: La Locazione è speciale? 

Cioè si riferisce alle Locazioni 24, 28, 57, 67, 74 e 92 ed è preso in considerazione dal 
Modulo 11.1. 

DOMANDA 2: Il pericolo è ancora presente? 

Le Variabili SV, EV, DV ecc., (Modulo 11.1 di nuovo) controllano ciò, col loro valore. 
Se sono impostate a 0 il pericolo è presente. Se sono impostate a 2 il pericolo non c’è. 
A questo stadio il pericolo non sarà mostrato sullo schermo. 

DOMANDA 3: L’input è valido? 

Il programma adesso controlla se l'input 1$ è valido. Se no, viene data una risposta 
appropriata. In effetti, ciò che si riferisce a errori, scritture senza spazi, ecc., viene 
considerato nel Modulo 10.2. 

DOMANDA 4; L’oggetto è nell'Inventario? 

Questa non è proprio tutta la verità, dato che potete sfuggire ad alcuni pericoli senza 
un oggetto nell’inventario (per es. il dinosauro). Tuttavia il problema è principalmente 
quello di uccidere i mostri e perciò avete bisogno di una mitraglietta, o di un coltello, 
quindi la prima cosa che il programma fa è controllare che abbiate l’oggetto appropriato. 
Se avete l’arma giusta, allora il programma dice “okay” e siete salvi (e la Variabile è 
impostata a 2 per tenerne conto la prossima volta che passate dalla stessa Locazione). 
Se non avete l’oggetto giusto potreste scoprire di essere morto! 

Naturalmente il flowchart è semplificato, ma delinea la strategia di base che ho usato 
per occuparmi della maggior parte dei pericoli. 

Il Flowchart 12.2 illustra questi principi nella Locazione 28. 

Riguardo il nuotare 


MODULO 12.2 

1 9oto 3 

2 save " @0 : m 12.2 ", 8 : ver i f’y " m 12.2 ", 3 : stop 

3 rem 

6530 i f i *» " 9 " or l eft $ < i *, 6 > = " guarda " ther.9 
osub13009 : 9oto6610 
6600 9oto6640 

6610 i f P =28andy y = 1 thenP r i nt " Siri ori vedete 
molto sotto ac4ua! !" : 9oto5000 
6620 9oto4020 

6710 i f i $= " va i. I a.9o " andP -28a.nd r c=21 hen30 
650 

6720 iflef't$<i$,5> = "nuota"andP =23andrc=2 
ther.30650 

6730 ifleft#<i$■5> = "tuffa"andP=28andrc=2 
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then.30650 

6740 ifi$*"vai la9o"artdP=28the , rì30510 
6750 ì f ì i= " va ì ri va " andP028theri7810 
6760 ifi$="vai riva"andP=28then6780 
6770 9oto6800 

6780 i f es=2the n9osub 18000 ; 9oto20540. 

6790 i f e s < > 21 he ri 9 o s u. b 19000 : 9oto6130 
6800 i f 1 et"( i $.. 5 ) = " mota " andP =28then305 
10 

6810 ì f l eftt C i $, 5 ) = " tuffa " aridP =28then3@5 
10 

6820 if 1 et" 1 1$< i$, 3) = "vai "theri9osu.b 18000 : P 
r int "Cuale di rez i one ?" : 9oto432@ 

6830 i f 1 ef t$ ( i $ • 6 > = " vaf f ari " thenyosub 1900 
0 : P r i nt " vo i "'n$ : 9oto5000 


Quando arriviamo la prima volta alla Locazione 28, all’inizio non ci troviamo effettivamen¬ 
te nel lago. Perciò ci serve un qualche modo per entrare veramente nell’acqua. Ho 
messo alla prova diverse persone per vedere cosa potessero scrivere, e le risposte più 
frequenti sono state NUOTA, VAI AL LAGO o TUFFATI DENTRO. Questo Modulo si 
occupa di tutti questi comandi. 

Linee 6590-6620: Queste linee possono confondervi un po’ perché sono messe un po’ 
fuori dal contesto. Si riferiscono al comando GUARDA. La prima Linea 6590 è il 
comando 1$. Poi la Linea 6600 suppone che abbiate superato questa sezione del 
programma (per andare in un’altra area che non abbiamo ancora messo). 

Linea 6610: Si riferisce alla risposta "GUARDA” se siete nella Locazione 28 è 'sotto' 
l’acqua (da qui la variabile WW = 1 che viene impostata una volta che entrate 
nell’acqua). La Linea 6620 è la risposta standard al comando “GUARDA” e porta il 
programma alla routine di movimento, cosicché verrà scritto “SEI NEL DESERTO” o 
in qualunque altra parte. 

Lasciatemi divagare ancora un po' su questo argomento. A volte nel programma 
potete trovare che state battendo un certo numero di comandi (come “ARRAMPICATI 
SULL’ALBERO” o “ESAMINA I SASSI” e le risposte fanno scorrere in su lo schermo 
in modo che la vostra Locazione sparisce. Quando decidete di muovervi potete aver 
dimenticato dove siete o quale direzione dovete prendere, quindi battendo “GUARDA" 
vi verrà ripristinato il testo che ve lo dice. 

Ora nella Locazione 28 abbiamo un problema speciale - una parte di questa Locazione 
è il lago (dove siamo alle prese con l’anguilla). Sarebbe stupido che battendo “GUARDA” 
venisse fuori di nuovo “SEI SULLA SPONDA DEL LAGO”. 

Le Linee 6610 e 6620 prevengono questo fatto. 

Prima di andare alla prossima sezione guardiamo un attimo di nuovo le variabili implicate 
nella Locazione 28 e nel pericolo dell’Anguilla. 
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Tavola 12.1: Variabili per il pericolo “anguilla” nella Locazione 28. 

CV impostata a 2 quando viene trovato il Cristallo. 

EV impostata a 2 quando l'Anguilla è stata uccisa. 

ES impostata a 2 quando l’anguilla è stata uccisa; impostata a 1 quando l'Anguilla vi 
ha bloccato. 

RE impostata a 2 per fermare il movimento del nuoto dalla Locazione 28. 

WW impostata a 1 quando l’anguilla vi ha catturato, per bloccare la risposta ad un 
GUARDA. 


Linee 6710-6730: Queste linee si applicano quando RE = 2 (in altre parole l'anguilla 
vi ha preso) e voi cercate di sfuggire battendo NUOTA o TUFFATI. Ci sarà una risposta 
“LA BESTIA VI TIENE BEN STRETTI PER IMPEDIRVI DI FUGGIRE" (nel Modulo 
12.4 - ancora da fare). 

Linee 6740-6800 e 6810: Queste sono le linee che vi portano nel lago. Quindi se siete 
nella Locazione 28 e battete uno di questi tre comandi (NUOTA, TUFFATI o VAI LAGO) 
andrete al Modulo 12.4. 

Linea 6750; Questa linea è per quelli che battono “VAI RIVA" quando non sono nella 
Locazione 28 (è sicuro che qualcuno lo farà). Manda il programma a una risposta “‘TI 
STAI COMPORTANDO IN MODO UN PO’ STRANO". 

Linee 6760-6770: Se siete nel lago e battete ‘‘VAI RIVA" allora dobbiamo controllare 
diverse cose prima di permettervi di scappare - altrimenti qualcuno potrebbe sfuggire 
dalle spire dell’anguilla dicendo semplicemente ‘‘VAI RIVA", e non possiamo permet¬ 
terlo! La Linea 6770 è per comandi che non si riferiscono al lago e all'anguilla e bypassa 
le prossime poche linee. 

Linee 6780-6790: Bene, siete nel lago e battete ‘‘VAI RIVA". Per prima cosa controlliamo 
che ES = 2 (ES è messo a 2 dopo che l’anguilla è stata 'uccisa' con successo). Se ES 
= 2 allora andiamo alla Linea 20540 che è l'inizio della descrizione della Locazione 
28 - in altre parole la scritta ‘‘SIETE SULLA SPONDA DEL LAGO" appare di nuovo. 
Se ES non è 2 allora siete ancora nelle spire dell'anguilla - quindi il programma torna 
indietro a 6130 (che è la routine per impedire il movimento nel Modulo 11.2). 

Linea 6820: Questa linea non si riferisce propriamente a questa Locazione. È una 
semplice routine nel caso che il giocatore batta VAI in qualunque momento. Notate 
come ho usato LEFT$ (1,3) = “VAI" perché in questo modo vengono usati anche 
comandi come ‘‘VAI OVEST' o “VAI EST". 

Linea 6830: Se vi sentite particolarmente frustrati potreste essere tentati di scrivere 
“VAFFANBAGNO" e questa linea aggiunge un tocco di umorismo. 
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MODULO 12.3 


1 9otO 3 

2 save"@0 : ml2. 3" .• 8 


ver i fa "ni 12.3 " .■ 3 : stop 


3 reni 

7520 ì fvef = " P r end i " andP =28ther.32070 
7530 ìfve$="afferra"andP =28then32070 
7540 i f vef="acch i aPPa"aridP =28then32070 
7640 i fve$= " u.cc idi" orve$= " sfaso i a " orve$= 
" d i stru.99 i " then 12300 
32040 rem## 

32050 rem non Potete Prendere cristallo 
32060 rem## 

32070 ifno$="cristaIlo"then32090 
32080 9oto11700 

32890 i fev02then9osub 19000 : P r i nt " ^Mon P 
otete..."; : form=lto500 : nextm 
32100 ifev<>2thenPrint"... ancora ! !" : P rin 
t"E' asottoa acqua.":9oto4320 
32110 ifve=2then11700 


Supponete di arrivare alla Locazione 28, vedete il Cristallo, e battete “PRENDI CRI¬ 
STALLO”. In questo momento non c’è nulla che impedirà al programma di dire “OKAY”, 
e il cristallo è nell'Inventario. Questo Modulo previene ciò. 

Linee 7520-7550: Semplici comandi concernenti il comando “PRENDI" quando siete 
nella Locazione 28. Per assicurarvi di non ricevere una risposta scorretta il 64 bypasserà 
il solito modulo “PRENDI” e manderà il programma alla Linea 32070. 

•Linea 7640: Questa è la linea per il comando UCCIDI ecc., che vi porterà al Modulo 
12.1 (che abbiamo introdotto all’inizio del Capitolo). 

Linee 32070-32080: La Linea 32070 controlla se NO$ è “CRISTALLO” Se eravate 
nella Locazione 28 e avete battuto “PRENDI” ma non avete battuto "CRISTALLO” 
(per esempio potreste aver lasciato cadere qualcosa alla visita precedente e ora vorreste 
riprenderlo), allora la Linea 32080 manderà il 64 alla sezione appropriata del programma. 

Linee 32090-32100: Queste due linee vi impediscono semplicemente di “prendere" il 
cristallo se EV non è impostato a 2 (l'anguilla è ancora viva). 

Linea 32110: Se l'anguilla è morta (EV = 2) allora siete rispediti indietro alla routine 
PRENDI nel Modulo 10.3 e potete “prendere" il cristallo con successo. 
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L'anguilla vi ha preso. 

Possiamo supporre che il nostro giocatore abbia trovato il modo di entrare nel lago per 
provare a riprendere il cristallo. Ci sono varie situazioni che influiscono sul modo di 
trattare il prossimo stadio. 

Le possibilità sono: 

1. Non indossate la tuta spaziale. 

2. Indossate la tuta spaziale ma non avete ancora raccolto il rottame. 

3. Indossate la tuta spaziale ed avete il rottame. 


MODULO 12.4 

1 9oto 3 

2 save"@0 : m12.4",3 : verifa"m12.4",3 : stop 

3 reni 

12029 i fP =28aridno$= " tuta-sP az i a l e " thenyo 
sub19000 : 9oto30510 

12050 i f P =28andno$- " tuta-sP az i a ! e " then9o 
sub 19000 : Print" rista te affondando" : 9oto30 
540 

30510 1 f oh'/. < 6 ) O-1 then9oto30540 

30515 ifve=2then9osub18000 : P rint"bel 9io 

rno Per un tuffo! Cosa ora?" : 9oto4320 

30520 if obX (4 > <>-1then9oto30560 

30530 9oto30590 

30540 9osub 1 9000 •’ p r i nt 11 Non avet e P i u / 1 ■" 
a s t r o n a v e , vero " > n £ 

30550 Print"Maledizione ! ! Siete annegato 
! ! " : forrri=l to2000 : nextm : 9otol90 
30560 9osub18800 : p rint" UGa11e99iate come 
un sughero. Vi occorre Qualcosa 
30570 Print"di Pesante Per tuffarvi 
30580 Print"giu" Per Prendere il cristai 
lo." : 9oto5000 

30590 i fobli < 2 > =-1 then9osub 18000 : P r i nt " 
ella giornata Per un tuffo ! ! !" : 9oto4320 
30610 es= 1 : P r i nt " SR11 - ' i n i z i o scendete f i 
no a Prendere il cristallo. 

30620 Print"fìll"imProvviso esce dal Prof 
ondo una. gigantesca anguilla " 

30630 Pr in t "e vi si a11 or c i 91 i a int or n o. 

il 

30640 Print"Vi sta stritolando. : 9osub 
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19000 : re*2 : q =0 :y y = 1 9oto5000 

30650 9osab 18000 : P r i nt " >IL ' ? n i rii.?. I e v i Pi 

a stretto cosi' forte che " > 

30660 Pr ì rit" non Potete f u.99ire ! " : 9oto50 
00 


Linee 12020-12050: Queste due linee si riferiscono all'improbabile evento che vi tagliate 
la tuta spaziale mentre siete nel lago. Entrambe vi rimandano alla Linea 35040. Esse 
vi introdurranno alla sezione BUTTA del programma. 

Linee 30510-30530: Queste linee esaminano l’inventario per controllare se state indos¬ 
sando la tuta spaziale, se avete sconfitto l’anguilla, o se state portando il rottame. La 
Linea 30530 vi porterà oltre le prossime poche linee alla sezione dell'anguilla. 

Linea: 30540-30550: Niente tuta spaziale - affogate. C’è una piccola pausa e uscite 
per giungere alla Linea 190. 

Linee 30560-30580: Se non avete il rottame allora boccheggiate in superficie' e 
attendete istruzioni. 

La rilevanza di RE diviene evidente qui. A questo stadio non avete ancora incontrato 
l’anguilla - quindi RE è impostata a 0 e voi potete scappare battendo “TORNA A RIVA” 
per cercare di trovare qualcosa di pesante. 

Linea 30590: Questa linea vi permette di tornare al lago dopo che avete trovato il 
cristallo, se lo desiderate. 

Linee 30610-30640: Questo è il pericolo principale - l’anguilla stessa. Come vi immerge¬ 
te nel lago, l'anguilla viene su e vi prende. L'uso delle Variabili necessita qui di un po’ 
di spiegazione. Prima di partire abbiamo impostato ES a 1 - che vi impedisce di andar 
via dal lago di nuovo battendo “S” (Modulo 11.2, Linea 6010). Quindi impostiamo RE 
a 2 (che vi impedisce pure di scappare battendo NUOTA o TUFFATI invece di “N” o 
“S”). La ragione della necessità sia di RE che di ES è il fatto che potete scappare sia 
con una direzione che con la parola NUOTA. Q viene impostata a 0 perché stiamo 
contando il numero dei tentativi che il giocatore fa per sfuggire prima di essere ghermito 
dalla morte. Alla fine WW viene messa a 1 (questa variabile impedisce che il comando 
GUARDA dia la solita risposta - Modulo 12.2). 

Linee 30650-30660: Queste linee si riferiscono ai tentativi di scappare battendo NUOTA 
ecc. che ho menzionato nel Modulo 12.2. 

Linea 12500: Questa linea si riferisce ad un comando relativo allo sparare all'anguilla 
e si assicura che andiate alla linea opportuna. Nel caso di questo pericolo la mitraglietta 
non vi trarrà fuori dai guai - dato che sott’acqua non funziona. 

Linea 12510: Se avete battuto UCCIDI o PUGNALA questa linea controlla che il coltello 
sia nell’inventario. Se lo è allora avete successo - il programma va alla Linea 12610. 
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Successo o sconfitta 

MODULO 12.5 


1 90 to 

2 ss ve " @9 : r»ì 12.5 " .■ 8 : ver- i fa " m 12.5".' 8 : stop 


3 reni 

12470 reni** 

12480 rem anguilla 


12490 rem** 

12500 i f ve$~ " sP ara " orve$= " m i tra.91 i a " then 
12520 

12510 ì fobli ( 8 > 1 thenP r- i nt " fiSJK. Avete us 

ato i l co Iteli o. " : 9osu.b 1 8000 : 9oto 1261 0 


12520 if obY .<7> =--1 then9osu.b 18000 : Print"<11 
1 mitra non funziona sott'acqua..."; 
12530 i fobli < 7 > =-1 thenP r int " e dovete esc 
o9itare qualcosa di meglio..." 

12540 i Yoh'À <7 > =-1 thenPri nt "State di venta 


ndo Piu/ debole..." : 3oto5000 
12550 P r i nt " 5>L. •' an9u i 11 a v i t i ene strett 
o e vi stritola " 

12560 Print"sempre Piu'... state Perdend 


o i sensi..." 

12570 form=1to2000 : nextm 
12580 9osub 19008 : P r i nt " fi ufi a l edett i cuochi 
i! Siete morto!" 

12590 Print"SlFvreste dovuto estrarre 4u 
alcosa Per ucciderlo ! !" 


12600 9osub1 9000 : goto190 

12618 p rint " SL 'an9u 1 11a si dibatte amPia 

mente nell •'agonia - Poi sprofonda "1 

12620 Print"ne1 la9o." : 9osub18000 

12630 P r i nt " Non d i ment i cate i l cr i st a. 11 o 

,..":ev=2 : es=2 : rc~0 : yy~0 : 9oto5000 


Linee 12520-12540: Queste linee sono la risposta se non avete il coltello ma avete la 
mitraglietta. Avendo controllato nell'Inventario che avete la mitraglietta vi arriva la 
risposta "LA TUA MITRAGLIETTA NON FUNZIONA SOTT’ACQUA”. Venite mandati 
indietro alle Istruzioni per pensare e provare qualcosa d'altro. 
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Linee 12550-12600: Un'allegra sezione che interviene in due situazioni: 

1. Non avete né coltello né mitragliela 

2. Se avete solo la mitraglietta e dopo 10 tentativi non siete sfuggiti. 

Naturalmente non c’è modo di sfuggire questo piccolo rischio senza il coltello, e dato 
che il programma si ferma, non potete scappare a prendere il coltello - è quindi una 
specie di abbraccio mortale. Ma dare al giocatore la sensazione di avere una possibilità 
di salvezza, aiuta ad aggiungere mistero all’Adventure. (Infido, eh?). 

Linee 12610-12630: Finalmente il successo. L’anguilla muore e con un accenno il 
programma aiuta a non dimenticare il cristallo, vi consente di lascire la Locazione e 
imposta le variabili di nuovo. 

Potreste, se volete, omettere la Linea "NON DIMENTICARE IL CRISTALLO" e lasciare 
che il giocatore tomi indietro alla nave solo per scoprire che ha dimenticato di battere 
"PRENDI CRISTALLO” al lago. 

MODULO 12.6 

1 9oto 3 

2 save " 00 : ri 12.6 ", 8 : ver- i fa " m 12.6 " > 8 ; stop 

3 rem 

5040 rem#* 

5050 rem loop anguilla 
5060 rem** 

5070 ifP =92then5290 

5080 ifP=67then5200 

5090 i fP O28then6000 

5100 ifev=2then6000 

5110 ifP=28andes=2then6500 

5120 q*q+l 

5130 ifq<59oto6000 

5140 ifq=5thenPrint"Bi8state3l veramente i 
ndebo1endovi..." :9oto5120 
5150 ifq = 10then9osub19000 : P rint"BEcco 1 
" ; nt 

5160 ifq=10thenPrint"Siete stati stritol 
ati a morte." : goto190 


Linee 5070-5110: Queste linee assicurano che il programma bypassi questo piccolo 
loop se non siete nella Locazione 58 e non siete tra le spire dell’anguilla. Dato che ci 
sono altri loop da considerare, il programma passa all'area opportuna. È meglio che 
voi semplicemente battiate queste linee e torniate indietro poi, per vedere esattamente 
dove vanno. 
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Linee 5120-5160: Questo è il vero loop. Ogni volta che il giocatore dà un comando al 
64 (come UCCIDI e altro) Q si incrementa da 1. Quando Q = 5 c’è un piccolo richiamo 
che il tempo sta per scadere... “STAI DIVENTANDO SEMPRE PIÙ DEBOLE”. Se non 
ne venite fuori al decimo tentativo, tornate al primo quadro. 

Prova dei Moduli 12.1-12.6 

Sfortunatamente non potete provare questi Moduli dato che alcune linee contengono 
dei GOTO che mandano il programma a una sezione che aggiungeremo nel prossimo 
Capitolo. 

Sommario 

Questo Capitolo è un tour de force di programmazione nei giochi di Adventure, 
contenente un confuso miscuglio di idee, variabili e situazioni. Non scoraggiatevi se 
non siete sicuri di aver capito tutto - perché il peggio l’ho passato prima io! Ho trovato 
che il risolvere la programmazione fosse estremamente stimolante (una volta avrei 
smesso di lavorarci su) e al tempo in cui finii l’intera Adventure, ero veramente dispiaciuto 
che l’ampiezza del testo che avevo scelto per aggiungere atmosfera fosse limitata, 
diminuendo le mie possibilità di scelta dei pericoli. 

Sto tuttora pensando a come cambiare ciò nella mia prossima Adventure. 
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CAPITOLO 13 


DISCORRENDO DI AMENITÀ 


Una lontana storia... 

Il nostro intrepido eroe ha cercato di pilotare la sua astronave per atterrare in verticale 
in un vasto deserto di un remoto pianeta, lontano dalle normali rotte spaziali. Egli deve 
evitare di distruggere la sua astronave, ha perso il suo prezioso cristallo di energia, e, 
come se non bastasse, l’amore della sua vita è stato rapito da una persona sconosciuta. 
La salvezza sembra lontana, e adesso egli deve adoperarsi per trovare la Principessa, 
e il suo cristallo di energia, se vuole ancora vedere gli azzurri cieli e le verdi colline di 
casa sua. 

Egli si mette in cammino attraverso il territorio alieno, incontrando rischi e misteri nella 
sua ricerca, finché alla fine dopo un po’ di tempo trova il suo cristallo in fondo ad un 
lago, e riesce a superare l’attacco di un’anguilla gigante che tenta di impedirgli il 
recupero. Finalmente riporta il cristallo sulla sua astronave. 

Rileggiamola... 

Quando avevo raggiunto questo stadio nella mia programmazione sono incappato in 
un piccolo problema - quando avevo programmato le locazioni avevo inizialmente 
dimenticato di ritornare o con il cristallo o con Aurora (o con entrambi) alla locazione 
58 e 59 (la navicella). Quindi la prima volta che sono tornato alla nave, (supponendo 
con il cristallo, la Principessa, o entrambi) ho previsto solo che potesse apparire sullo 
schermo che entrambi erano ancora mancanti. 

In altre parole avevo bisogno di alterare la scritta sullo schermo se tornavo indietro con 
OB%(2) - il cristallo - o con OB%(9) - Aurora - nell'inventario. Adesso è ora di 
rimediare a questo inconveniente. 


Un finale felice 

Il modulo che segue contiene le linee mancanti dalla sezione delle Locazioni (Modulo 
9.1), e le linee per “trovare” appropriatamente Aurora e il cristallo. Mi sono basato sulle 
seguenti possibili combinazioni: 

1. Ritornate con la Principessa, ma non con il cristallo 

2. Ritornate col cristallo, ma non con la Principessa 

3. Ritornate con entrambi 

4. Salvate la Principessa, ma dimenticate di prenderla. 

Avevo bisogno di quest’ultima opzione perché era possibile superare l'ostacolo degli 
alieni (di cui nel Modulo 13.4), ma semplicemente dimenticare di battere PRENDI 
AURORA. Ho pensato che non fosse necessario prevedere anche la non presa del 
cristallo, perché questo era più ovvio (e non ho messo segnalazioni nel testo in 
proposito). 
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MODULO 13.1 


1 9oto 3 

2 seve"@0 : rol3. 1 


verify "mi 3. 1 " 


stop 


3 rem 

3330 Pr in t" 21 IDoPo sole Poche ore di levo 
f-'O Potete decollere cori l'astronave " > 

12070 ìfP=59endot = "eurore"then33350 

21205 i f ot<y. < 2 > =-1 andob/J < 3)=-l then33230 

21210 1 fot >y. < 2 > <>-1 thè ri 21240 

21220 i fob/i < 2 > =-1 thenP r i nt " >t'1a9n i f i co 3 fl 

ve te- il cr i ste 11 o. " : cv=2 

21230 Print"flettetelo e riPosere nelle 

tece neIle cebìne PrinciP e1e." : 9oto21380 

21240 i fP r=2endob7. < 3 > =-1 then21330 

21250 ì fhh=2theri21270 

21260 i fP r=2endob‘i< 9 > O-11hen21350 

21280 ifPr=2then21380 

21330 Pr i nt "li ridi etro cori eurore - Potre 
i Porterie nelle cebine principe le "> 
21340 Print "e offrirle una tazza di te'! 

! " •' 9oto21380 

21350 9osub 19000 : P r i nt " iiD i ment i cete d i TU 
Prendere eurore nel ville.99io "'> 

21360 Print"indigeno ";n$ 

21370 print"Un Po' stupido - tutto ciò'! 

! Dovete temere Per lei." 

21400 ifcv=2endPr=2then33286 
21410 i fcv=2endP rO2then33400 
21420 ifcv=0endPr=2then33460 
21450 ifP r=2then21500 
22010 9oto22040 
33250 rem*# 

33260 reni eurore trovata 
33270 reni*# 

33280 9osub35100 : P rint" 

33290 Print">in£*IDori9retuleziorii ! ! Avete 
cornP iuto 1 e missione ! ! " 

33300 Print"2*tDoPo solo Poche ore Potete 
decollere con 1 ' estrone ve 
33310 Print"e tuffarvi nello spezio Prof 
ondo." 

33320 Print "SUE le Principesse eurore he 
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Il • 


a 11 a 

fine decis 

o di non 

sP osa 

re " 

j 



33330 

Pr inf il c 

rudele ti 

ranno 

di 

Zen 


in 

f i Ti e ! ! 

"sprint" P 

referi see 

vo i 

" ; ris¬ 




33340 

p r infelice 

1"avete 

fatta 

eli 

9 » : 

p ok 

6V+21 > 

0 : end 







33350 

9osub1 8000 

sprint"» 

urora 

vi 

b ac 

1 

3. 

p et- 1 

fortuna c 

he avete 

avuto 

nel 

H ■ 

} 



33360 

P r i nt 11 tro v 

are i1 ma 

9 i co 

cris 

tal 

1 

O. 

"■ hh=2 

; 9oto12030 







33370 

re r*ì## 







33380 

rem cri sta 

11o trova 

to 





33390 

rem** 







33400 

9osub35100 

sprint"»" 

: P r i nt " sii 

kay 


- 

cos i •' 

avete ile 

ristai lo 

eneryetie 

o. " 

) 


33410 

P rint"Ora 

tutto eie 

' che 

dovete 


fa 

re e-' 

trovare la 

P rineiP e 

ssa ! " 





33420 

Pr inf'Hon 

dimentiet 

e di 

1 asc 

i ar 

P 

q 

ui il 

cristaIlo. 

" : 9oto215 

00 





33430 

rem** 







33440 

rem niente 

erista11 

0 





33450 

rem** 







33460 

9osub35100 

sprint"3" 

: P r i n 

t" flOkay 

■ 

a 

urora 

e' sa1va e 

voi Potè 

te 





33470 

P rint"1 ase 

iarla qui 

se voiet 

e. " 


90 

to21500 








Linea 12070: Questa linea viene dalla subroutine “BUTTA” caduta e viene applicata 
se battete “LASCIA AURORA” nella locazione 59. Essa vi manda ad una piccola 
sezione alla fine del programma (vedi più avanti in questo modulo). 

Linea 21205: Stavo dimenticando questa linea (come potete vedere dal numero di linea 
che è stato aggiunto) che controlla se avete nell'Inventario sia Aurora che il cristallo. 
Se li avete entrambi, allora c’è un “GOTO” alla linea 33280 che è il messaggio finale 
di successo del gioco. 

Linea 21210: Nel momento in cui entrate nella locazione 58 dall'esterno, questa linea 
inizia a controllare lo stato del vostro inventario. Se non avete il cristallo, questa linea 
vi invia alla Linea 21240, dove controllerà se avete o no Aurora. 

Linea 21220-21230: Queste linee presumono che voi abbiate il cristallo (altrimenti le 
avreste bypassate) e impostano CV a 2, stampano un messaggio carino, e vi inviano 
alla Linea 21380 (l'ultima linea della sezione delle Locazioni nel modulo 9.1), che vi 
consentirà di muovervi nella cabina. Notate che abbiamo trascurato tutto il precedente 
testo sul brandello del vestito di Aurora ecc., che non è mai più applicabile. 

I 

Linea 21240: Avendo controllato il cristallo nella Linea 21210, controlliamo adesso se 
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la Principessa è stata salvata. Questa linea controlla anche se avete lei nel vostro 
inventario, e, se si, vi invia alla Linea 21330 che dice “RITORNO CON AURORA...". 
Linea 21250: Questa linea è l’inizio di una sequenza abbastanza complicata. Supponia¬ 
mo che voi abbiate Aurora con voi e che la portiate sulla navicella. Adesso dovete 
passare di nuovo attraverso la camera di decompressione per tornare indietro e cercare 
il cristallo: tutto il testo nella camera di decompressione diventa un po' superfluo 
(brandelli del vestito di Aurora ecc ). Quindi ho spezzato questo testo in due parti. 

1. Le semplici parole “SEI NELL’AIRLOCK” (Linea 21270) che apparirà ogni volta che 
voi passate dalla locazione 58. 

2. Il resto del testo della camera (Linee 21990-21320). Quindi questa linea annota se 
HH = 2 (che è vero solo quando voi avete portato Aurora nella navicella e l'avete lasciata 
lì) e, se si, vi spedisce alla linea “SEI NELLA CAMERA DI DECOMPRESSIONE ". 
Linea 21260: Questa è la linea per i giocatori che hanno salvato Aurora ma che hanno 
dimenticato di prenderla. 

Linea 21280: Questa linea viene dopo la linea “SEI NELL’AIRLOCK" ed è qui per 
controllare se avete già salvato la Principessa dagli alieni (PR = 2). Se no verrà scritto 
il resto del testo. Se sì, bypassate questa linea e andate all'ultima Linea di questa 
Locazione. 

Linee 21330-21370: Le appropriate risposte. 

Il problema che ho avuto in questa sezione è stato abbastanza considerevole, quello 
cioè di cercare di assicurarmi che avessi coperto tutte le possibilità. In un certo senso 
quest’area di programma è un perfetto esempio di come una piccola parte richiede una 
lunga riflessione - e anche di come la più lunga parte del lavoro di creazione di un 
gioco di Adventure sia la raffinazione e la correzione degli errori alla fine. Non sottostima¬ 
te questi aspetti. 

Adesso iniziamo la seconda sezione - le stesse risposte per la Locazione 59. Linea 
21400: Se avete sia il cristallo che la Principessa, allora c’è un GOTO al messaggio di 
successo. 

Linea 21410: Non c'è la Principessa, ma c’è il cristallo. 

Linea 21420: Non c’è il cristallo, ma c’è Aurora. 

Linea 21450: Questa è un’altra linea inserita nel testo solo per tagliare le parti relative 
a segni dello struggimento della Principessa nel caso voi l’abbiate salvata. 

Linee 22000-22010: Queste linee sono inserite nel villaggio alieno. Forse non ricordate, 
ma quando avete battuto questa sequenza, ad un certo punto avete sentito una donna 
che cantava tristemente nelle vicinanze. Naturalmente si suppone che sia Aurora, quindi 
se voi la salvate dobbiamo omettere queste linee quando tornate indietro dalla capanna. 

Linee 33280-33340: Ciò che ho liberamente battezzato il “messaggio di successo" Una 
volta che avete sia Aurora che il cristallo, entrate in questa subroutine. Appare Victor 
e viene fuori il messaggio di congratulazioni. Alla fine viene cancellato Victor e il 
programma finisce. 

Linee 33350-33360: Se avete Aurora ma non il cristallo, questo messaggio appare 
quando voi lasciate la Principessa nella locazione 59 (ricordate la linea 12070). Notate 
che HH viene impostato a 2. Infine siete ritornati alla sezione “CADUTA” così che 
Aurora può essere lasciata cadere e verrà fatta l'appropriata sottrazione dell'inventario. 
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Linee 33400-33470: Queste due routine sono relative al testo che appare quando 
arrivate alla cabina portando o Aurora o il cristallo, ma non entrambi. 

Rileggendo la spiegazione di questo modulo, io stesso che ne sono l'autore l'ho trovato 
un po’ complicato, quindi andiamo su qualcosa di più semplice: vediamo gli altri pericoli 
nell'Adventure. 


Paludi e mostri 

MODULO 13.2 


1 9oto3 

2 £ 3." @0 : ni 13.2 " .■ 

3 rem 

6640 ifleft$<i$,5 


ver ify "mi 3 . 2 " .■ S ■ stop 
" sa 1 tu. " andP =67then 133 


10 

6650 i f 1 ef t$ < i f > 4 > -- " t i r a " andP =6?then 1331 


0 

6660 if1eftt<i$,9 > = "9a11e99 1 a"andP=67the 
ni 3310 

6670 if 1 ef t $i t, 5> = "nuota"andP =67then 133 
10 

7710 ì f vet- " 1 anc i a " andP ~67then9osu.b 18000 
: 9oto13300 
13270 rem** 

13280 rem £abbie mobili 
13290 rem** 

13300 ifobZ< 1 )a- 1 andnof»"corda"thenP rint 
"lisca 1 tra mossa " ; nf : 9 oto 13305 
13302 9 oto 7865 

13305 Prinf'La fune Pende da un albero e 
voi 1a P rendete. " : 4v=2 ; 9oto4320 
13310 9osub19000 : Print"iWon vi sare/ d"a 
i uto '1 ue Ila v i a " > nt : 9oto5O09 
13320 Print"Affondate sempre Piu"!" 

13330 form=1to1000 : nextm 
13340 9osub 19000 : P r i nt " G1 u... . 91 u. .. s i e 
te P erduti" : 9oto190 


Questo modulo riguarda alcune risposte 1$ e le sabbie mobili che incontrerete nella 
locazione 67 (giusto a sud della navicella). Per uscire dalle sabbie mobili dovete avere 
la corda (trovata nella locazione 15) e dovete valutare il rischio di prendere il coltello 
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che vi serve per uccidere l'anguilla (essa sta cominciando a mugolare il motivo “La 
casa che Jack ha tatto"!!). 

Linee 6640-6670: Una gamma di possibili parole che potete usare. 

Linea 7710: Il comando VE$ che vi porta al successo. 

Linee 13300-13305: Se avete una corda, allora potete lanciarvi fuori dalle sabbie mobili, 
impostare QV = 2, e proseguire la vostra strada. La linea 13302 serve solo a evitare 
l’istruzione di scnttura nella linea 13305 nel caso in cui voi battiate "LANCIA UNA 
BOMBA’’ o qualcosa d'altro. 

Linea 13310: Se vi capita di non avere la corda con voi - Avete solo una piccola 
speranza, un loop di tempo, prima di sprofondare nella palude. Mentre state cercando 
di uscire, questo messaggio verrà fuori ogni volta che ci provate, e “LANCIATE’’ 
qualcosa. 

Linee 13320-13340: Alla fine, dopo che avete fatto quattro tentativi falliti per uscire, 
questa piccola routine esce e stampa “Glug... glug... Sei affondato!!”. Per capire 
completamente questa sezione dovete introdurre il Modulo 13.5. 

Il prossimo modulo riguarda il dinosauro che vi aspetta sulla vasta strada a sud verso 
il villaggio degli alieni. Ho voluto rendere il dinosauro un po' difficile da passare - ma 
non un pericolo mortale che possa stroncarvi. Forse uno dei piccoli extra della creazione 
del vostro gioco è il controllo che voi avete sul vostro giocatore potenziale. Egli o ella 
non hanno idea di quanto letali possano essere i pericoli, ne di quanti falsi richiami e 
trappole avete messo in giro. 

Torniamo al dinosauro. Quando ho scritto la storia l’idea era di ucciderlo con alcuni 
colpi ben piazzati del mitra, ma più ci pensavo e meno mi piaceva. Pensavo che il 
serpente morisse troppo facilmente. Dopo averci pensato un po' su, e aver sfogliato la 
mia grande collezione di fantascienza, decisi che il modo logico di sfuggire fosse di 
arrampicarsi su un albero e dondolarsi al di là. E questo è il modo in cui il programma 
finì per essere. 

Appena mi venne in mente l’idea di arrampicarsi su un albero, decisi di costruire una 
sezione dedicata aH’arrampicamento sugli alberi in qualunque posto della foresta - e 
questo è quanto il Modulo 13.3 è in grado di fare. 


MODULO 13.3 


1 9otoJ 

2 save " @0 : m 13. 3 ".. 3 : ver i fa " n 13. 3 ", 3 : stop 

3 rem 

6860 i f i $= " se a 1 a " then9osub 18000 : P r i nt " BBC 

osa volete che scali ?" : 9oto5000 

7500 i t"ve$= " sca 1 a " then7320 

7700 i f 1 eft#vef.• 3) = "cor"or 1 ef t$<ve$ • 3) = 

"caro"thenPrint " WF \uà 1 e via ?" : 9oto325@0 
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7920 if noSO"aIbere"then7970 

7930 i fP =42orP =43orP =44then9oto32500 

7940 i fP =52orP =53orP =54orP =55then9oto325 

20 

7950 it'P =62orP —63orP = 64orP —65then9oto325 
40 

7960 i fp =74thèn 1.3530 

7970 9osub 19000 : P r i nt " £Non P otete P roP r i 
o sca. 1 are " .■ noi : 9oto5000 
7930 9o s i j. b 19000 : P r i ri t ' ' 3 Pia c e n te! Ma - fi o ri 
eo come 11 • P r i nt ve$ • 9oto5000 
13470 rem** 

13430 rem dinosauro 
13490 rem** 

1350O i f o b 'i <7 ') '0 >— 1 th e n 9 o s u. b 13000 : 9o t o 135 

40 

1351 Gì 9 o s u b 13000 : P r i n t " it3 e b b e n e s P -a r a te 
coni in u.-a meri te .al me9lio - i vostri 
13520 Print"colpi rimbalzano sulla sua. P 
elle corazzata ! ! ! " 

13530 Print "Cosa ora "n$; " ?" : 9oto5080 
13540 Print"IJlon sembrate in realtà" Pes 
s e d e r e i l n e c e s s a rio " 

13550 Print"Per uccidere una cosi' 9ross 
a bestia "> 

13560 Print"Penso che sarete capaci di e 
v i t a rio e di ri m a n e r e v ivi!! " .■ 

13570 P r int 11 l'Ia il Pr■ oblema. e' come suPer 
arie 11 " : 9oto5000 
13580 Print"3":9osub3510 
13590 P r i nt " Glossa furba.. 4 u.esta " ; n$ ; : p r 
int"Ora. dovete Passare tra. 91i alberi ".■ 
13600 Print "e superarlo. Discenderete ari 
cora Piu' avanti »" : dv=2 : 9oto4320 
32470 rem** 

32480 rem scala albero 
32490 rem** 

32500 9osub 18000 : P r i nt " WR nord c"e"' una 

citta" in rovina ~ a sud molti "j 

32510 P r i n t "alberi a a. r i v a n o all" or i zz o n t 

e. Discendete." : 9oto4320 

32520 9osub 18000 : Print "3SR sud Potete ved 



ere la vostra, navicella - ovunque 
32530 Print"alberi su. alberi ... Discend 
ete." 9oto4320" 9oto4320" 

32549 9osabl3000 Print"*3 sud Potete ved 
ere del fumo salire al cielo. Può - ' " ■ 

32550 Print"esserci vita o cose simili. 
Discendete." : 9oto4320 


Linee 6860 e 7500: I comandi IS$ e VE$ per SCALA. Qui potrebbe essere una buona 
occasione per sottolineare la differenza tra i due. Il comando IS$ è per il giocatore che 
semplicemente batte SCALA e nient'altro, e la risposta è "DOVE MI SUGGERISCI DI 
ARRAMPICARMI/”. Il comando CLIMB di VE$ sarà sempre la prima parte di un 
comando, che potrebbe essere SCALA MURO o SCALA ALBERO. 

Linea 7700: Questa linea è in relazione coi possibili comandi CAMMINA o CORRI. 

Linee 7920 e 7970: L'unico valido sostantivo che voi potete arrampicare è ALBERO, 
quindi se il giocatore batte qualunque altra cosa queste istruzioni rispondono con “NON 
PUOI ARRAMPICARTI SU UN” e quindi la parola appropriata (es. muro o sassi). 

Linee 7930-7960: Se vi arrampicate su un albero di una foresta del nord ricevete un 
messaggio, se vi arrampicate su un albero nel centro ne prendete un'altro, e ancora 
un terzo se siete al sud. La linea finale 7960 è per arrampicarsi su un albero durante 

10 scontro col dinosauro. 

Linea 7980: Una risposta finale ad un comando VE$ che coinvolga una parola non 
valida (come STRANGOLA o LEGGI). 

Linee 13500 e 13540-13570: Se provate e uccidete il dinosauro senza avere il mitra 
prendete questo messaggio. 

Linee 13510-13530: Se avete il mitra allora queste linee vi dicono 18380 che i colpi 
rimbalzano sulla sua pelle. E ora? 

Linee 13580-13600: Alla fine il successo. Vi siete arrampicati sull'albero e potete 
passare al di là. 

Solo una nota. In questa locazione voi potete andare di nuovo a nord dove incontrereste 

11 dinosauro, ma non potete andare a sud. Le linee che permettono questa situazione 
sono le Linee 6170 e 6180 nel Modulo 11.2 

Linee 32500-32550: Queste linee sono la descrizione di quello che potete vedere dalla 
cima dell’albero. Ho cercato di dare solo qualche indizio senza lasciar trapelare troppa 
informazione, un buon modo di mantenere l’interesse. 

Il prossimo modulo si occupa di altri due pericoli - il serpente nella città e gli alieni che 
tengono Aurora. Il serpente è un pericolo abbastanza lieve, facile da evitare e che non 
causerà nessun problema ad un vero Adventurer (eccetto il caso in cui il vero Adventurer 
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si stia aspettando un qualche trabocchetto - così è una specie di doppio bluff). Gli alieni 
saranno un po’ più difficoltosi, e descriverò più estesamente la programmazione nella 
prossima sezione. 


MODULO 13.4 


1 9oto3 

2 save " @0 ; moda 1 o 13. 4 "8 : ver i f y " rnodu 1 o 13. 

4 " , • stop 


3 rem 
7570 if 
7580 if 
7660 if 


r $ — " P r e ti d i " 3. 'fi dP-92the n 3 313 0 
>$-"afferra "andP =92then33 1 20 
:• $■= " aech i a.P P a " andP ~92then33129 


12970 rem#* 

12980 r e m s e r P e n t e 


12990 reni*'* 

13000 i fot,-;< 7 >=-1 thenPr i n* " SO; ay " - 9osub 1 


8000 : voto13030 

13010 i f ob Vm ( 8 )=“11he fiPr i nt " fìvete so 1 o u.f ■ 
co lfé 1 lo — troPPo Poco ! " ■ 9ot*o5y00 
13020 P r ì n t" o r, a v e t e n u 11 a c o n c u i " ) v 
" .. e ora ?" : 9oto5000 
13030 Print"sii 1 serpente cozza contro un 
a casa vici via sollevando nuvole di " .• 
13040 P r i n t " P o 1 v e r e i n a r i a .< f i e 1 r a n t o 1 o 
mortale." 

13050 Prir11"aContenti di avere 4uesto mo 
tra " n$ '■ sv~2 '■ 9oto4320 
13670 rem#* 

13680 rem indi9em 
13690 rem** 

13700 i fobli ( 7 >=-1 then 13730 

13710 9o ■=. ij. b 18000 : P r i fi t " 6 S3 o n o t r o p p o 1 o r> t 

ani Per ucciderli! Neviìo tentare "i 

13720 Prifit"ufl'altra via. Forse aurora P 

otrebbe aiutare ..." : 9oto5000 

13730 9osub 18000 : P r i nt " Sii 1 vostre m i tra 

ha bisogno di molte ore Per ") 

13740 Print"ricaricarsi doPo la lotta co 
1 dinosauro."; 

13750 P r i ri t" D o v e t e p e ri s a r e a 4 u a 1 c o s 'al 
tro." : 9oto500@ 
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t 


•o 

i 


3090 

rem** 




3 1 00 

rem 1 i 

berazione il 

le 

9ale di aurora 

3110 

rem*+ 




3120 

i fmv'O 

2andnot="au.r 

or 

a. "then33170 

3130 

ì f'mvO 

2andno$="Pri 

TiC 

iPessa"thèn331 

0 





3140 

ì f’mvO 

2andnof="Pri 

Tic 

iP essa"them331 

0 





3150 

9oto11 

700 



3170 

902.iJ.b3 

5100 Primi"a 

ii 


3130 

Primi" 

^Spiacente " 

.* Tì 

$ '■ Primi "fi a 91 i 


iridi9eni mori a Piano i Piloti !!".; 

3190 Primi" e vi ha rimo impedito di ten 
are di liberarla. 

3200 Primi"Vi hanno ucciso ! H Questo v 
ha Portato la via! !" 9otol‘90 


Linee 7570-7600: Se voi provate a prendere Aurora in questa locazione queste linee 
vi mandano all’appropriata area del programma. 

Linea 13000: Se avete il mitra (e ogni Adventurer degno del suo nome si assicurerà di 
averlo preso subito all'inizio) allora ricevete questo messaggio se voi “uccidete” o 
sparate' al serpente. 

Linee 13010-13020: Se vi capita di non avere il mitra cadrete alla Linea 13010 che 
controlla se avete il coltello. Se l’avete allora vi dà questo messaggio. Se non avete 
neppure quello andate alla Linea 13020. 

Linee 13030-13050: Se riuscite ad uccidere il serpente vi appare il messaggio appropria¬ 
to e la variabile SV viene impostata a 2. 

Linee 13700-13750: Questa sezione si riferisce ad un tentativo di uccidere gli alieni. 
Per prima cosa va a vedere se avete il mitra (Linea 13700) e se l’avete, ricevete la 
cattiva notizia che ha bisogno di essere ricaricato (Linee 13730-13750). Se non avete 
il mitra le Linee 13710-13720 vi danno un piccolo indizio sul fatto che Aurora potrebbe 
aiutare. 

Linee 33120-33200: Supponete che abbiate tentato di prendere Aurora in questa 
locazione (92), allora sareste spediti a questa parte del programma. Per prima cosa 
guarda se avete battuto “aurora”, “principessa” o “Principessa” (notate la P maiuscola) 
e se no la Linea 33150 vi spedirerà indietro alla routine PRENDI. 


Se lo avete fatto tuttavia le Linee 33170-33200 dicono, da parte di Victor, che gli alieni 
“... non amano gli intraprendenti...” e vi avrebbero ucciso. 
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MODULO 13.5 


1 9oto3 

2 save " @0 : m 13.5 " .• 3 : ver i f'y " m 13.5 " > 8 : stop 

3 rem 

5170 reni** 

518 0 r e m l o o P dell a P a l u. d e 
5130 rem** 

5200 ifP =32then5290 
5210 ifPO67then6000 
5220 i fq v=2then6500 
5230 q=q+i 
5240 if q<59oto600@ 

5250 ifq=59oto13320 
5260 rem** 

5270 rem loop indigeni 
5280 rem** 

5290 i t" nvO2theri6000 

5300 i f■nv=2the , n6000 

5310 ifP=92andPr=2then6500 

5320 q=q+l 

5330 i fq <5t.hen6000 

5340 i f q =5then9osu.b 18000 : P r i nt " BfTerita " ; 
n$ : Print"Cosa il p roseirno?" : 9oto5320 
5350 ifq=10andi $="bacia aurora"then14030 
5370 i fq = 1 0then9os'J.b 18000 : p r i nt " SitroP P o 
tardi! Gli indigeni vi hanno scacciato"; 

5380 ifq=10thenPrint" fuori dalla caPann 
a — non Potete Prendere aurora 11 ; 

5330 ifq=10thenPrint"con voi. Meglio and 
ar via e Pensare ad altro 
5400 ifq = l0thenPrint"Per 1iberar1 a." : q =0 
: na-1 : nP=l : 9oto4320 

Questo Modulo aggiunge due loop di tempo per le sabbie mobili e gli alieni. Seguendo 

10 stesso modello del Loop dell'anguilla (Modulo 12.6) vengono contati gli input e dopo 
5 (per la palude) e 10 (per gli alieni) indirizza il programma all'appropriato responso. 
Nel caso delle sabbie mobili - l'avete già avuto. Nel caso degli alieni voi potete lasciare 
la capanna per andar via e pensare ancora. 

Sommario 

11 programma adesso è pressoché completo, lo spero che questo e il prossimo capitolo 
comincino a darvi idee che potrete sviluppare voi stessi per fare la vostra Adventure 
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interessante e divertente per il giocatore. Come ho già detto uno degli aspetti che mi 
ha lasciato scontento è stato il fatto che per creare una certa atmosfera - tale che vi 
sentiste veramente sul pianeta - ho usato molta memoria per il testo della descrizione, 
e ciò mi ha lasciato con troppo poco spazio per abbellire i pericoli e aggiungere enigmi 
più complicati e problemi da risolvere. Penso comunque di aver preso la giusta decisione 
in quanto io non amo questo genere di stampe: 

siete in una cella 

chiave in bottiglia 

e ora? 

comuni tanti Adventure. “Il Pianeta Dell’lncubo" è arricchito con prosa da fantascienza 
(un po' adattata per le costrizioni del 64) e non mi sarebbe piaciuto in nessun altro 
modo. 
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CAPITOLO 14 

UN BACIO TEMPESTIVO 


Dobbiamo solo riordinare alcune cosette sparse, e la nostra storia è completa. Può 
essere sembrata un po' lunghetta, ma io mi sono divertito, e così spero di voi. 

In questo Capitolo ci occuperemo di alcune parole extra che i giocatori potrebbero 
usare - e come un gran tinaie - del salvataggio della Principessa. 

Con una spintarella degli amici 

AIUTO è probabilmente la parola più usata e più noiosa di tutte le parole negli Adventure. 
Può essere la luce che vi illumina dopo quello che prima era un problema insormontabile, 
e può essere la frustrazione che minaccia l’esistenza del vostro micro. Ci sono state 
volte che volevo sfasciare la tastiera per certe sue stupide risposte che non mi aiutavano 
per niente, e ci sono state volte che l’avrei baciata (metaforicamente, naturalmente). 
Quindi quando sono arrivato al Pianeta dell'lncubo, ho dovuto decidere quanto aiuto 
avrei dato al mio giocatore potenziale. Ho deciso che Victor doveva scendere giù e 
introdurre la sezione di AIUTO per dare alcuni suggerimenti. Naturalmente voi potete 
dare degli indizi fuorvianti (molto astuto) ma io sono fondamentalmente onesto ed ho 
deciso di giocare correttamente. 

MODULO 14.1 

1 9oto3 

2 save " @0 : m 14.1 ", 8 : ver i f a " m 14 .1 " > 8 ; stop 

3 rem 

6560 ifi$="a"ori t ~"aiu to"then11000 
10970 rem** 

10980 rem aiuto 
10990 rem** 

11000 i f’hr=2then 11250 

11085 i f P=24theri9osub35100 : P r i r.t " 3" : 9oto 
11090 

11010 i f p = 581hert9osu.b35100 : P r i nt "3" : 9oto 

11100 

11020 ifP =6?then9osu.b35100- Pri nt"3" : 9oto 
11120 

11030 ifp=921he n9osub35100 : P rint"3" : 9oto 

11140 

11040 i fP = 1 orP =2orP = 11 orP = 12orP ==22then9o 
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su.b35100 : P r i nt " SS" : 9oto 11190 
11050 ifP=42orP=62orP»63then9osub35100 : P 
rint "3" : Setoli 170 
11060 9osab35100 : P ri nt " 58" 

11070 Prinf'flUo un Piccolo Problema che- 
mi turba "Jnf 

11080 Print"Tentare di tener testa, al vo 
stro Per un Po"..." : 9oto5000 
11090 Pr int" UT enta di uccider lo " > nf : pr i 
nt"Prima che lo faccia lui ! !" : 9oto50@0 
11100 P r i nt " UOr a. P enea, ser i amente " ; nf : P 
rint"Ci Può" essere qualcosa intorno 
11110 P r i nt " che P u.o " a. i utarv i... " : 9oto50 
00 

11120 P rint" US ìtuazione difficile^ uesta 
" ; n$ : P r i nt " Su99er i sco d i buttare " :> 

11130 Print" qualcosa Per lanciarvi fuor 
Ì.":9oto5000 

11140 Print"5#ÌPoiche" 91i indigeni Pens 
ano che aurora, sia. la loro regina " j 
11150 Prinf'e" meglio se vi fate vedere 
suo amico." : 9oto5000 

11170 Print"*Ci siamo Perduti nella fore 
sta... eh? Perche" non scalate un "i 
11180 Print"albero e guardate intorno." 1 
9oto5000 

11190 P r .i nt "®6embr i amo P erdut i entramb i 
"jn$ : Print"Meglio 

11200 P rint"incamminarci^ alla fine trov 
erete una via." : 9oto4320 
11250 P r i nt " SS" : 9osub35100 ■' Pr i nt ” «Won s i a 
mo amici.. al momento " ; n$ : 9oto 11310 
11280 P rint"3" ; 9osub35100 : P rint" oMon Pot 
ete uccidermi ";n$ 

11290 Print"5t3ono il nuovo modello invul 
nerabile. Ma..." : 9oto1131@ 

11300 P r i nt " 53" : 9osub35100 : P r i nt " r 4Z :i o " no 
n e" carino^ ";nf 

11310 P r i nt " Non Posso Ss i utarv i S P i u. ' " ; 
11320 Print" Potete farvi fronte da solo 
." : 9oto5000 


170 



Linea 6560: il comando 1$. 


Linea 11000: Nel modulo 10.4 e 12.1 potete ricordare che le linee 7865 e 12305 
prevedono la possibilità di scagliare qualcosa contro Victor, o di ucciderlo. Se ciò accade 
sembrerebbe logico che Victor sì risenta un po, e non sia disposto ad aiutare così 
facilmente; quindi per tener conto di questo fatto ho impostato la variabile HR a 2. 
Questa linea istruisce il programma ad evitare le routines di AIUTO se HR non è uguale 
a 2. 

Linee 11010-11050: Questi sono tutti i puntatori che intervengono nel caso voi battiate 
AIUTO in una qualunque delle opportune Locazioni. 

Linea 11060-11080: La risposta standard se voi chiedete I AIUTO in qualunque altra 
Locazione. 

Linee 11090-11200: Queste linee sono le risposte specifiche, di nuovo dipendenti dalla 
locazione. 

Linee 11250-11320: Se vi siete comportati male con Victor allora questa sezione si 
occupa della reazione ad ucciderlo o a tirargli qualcosa. Il tocco di Victor piuttosto di 
malumore perché lo avete spazientito è stato suggerito da Brendon Gore - e illustra 
l'importanza di chiamare qualcuno a provare il vostro gioco prima che voi esauriate 
tutta la memoria a disposizione, lo sapevo che i suggerimenti di Brendon erano geniali, 
e che sarebbe stato molto lieto che li avessi incorporati. 

Avevo lasciato degli spazi in questa sezione per permettermi di aggiungere altre reazioni 
in data successiva, ma sfortunatamente la carenza di memoria me lo ha impedito. 


Utilizzare e sparare 

MODULO 14.2 

1 9oto3 

2 save " @0 ; rnodu. 1 o 14,2 11 * 8 : ve r i f y " rnodu 1 o 14. 
2 "■8•stop 

3 re-ni 

766 0 ifv p$= "usa"thè-rii 150u 
11470 reni** 

11480 rern usa 
11490 reni** 

11500 i fp <>24orP074and 1 ef t$ ( noi ■ 5 > = 11 ni i t 
r a" theiil 1588 

11510 ifP<>24orPO749oto11618 
11520 i f P =24or-P =7 4 and 1 ef ti < no*, 5 > = " m i tra 
"then11580 

11530 1 + p =24orp =74a. ndnof 11 co 1 te* 11 o tf ie 111 
1550 

11540 9oto11660 

11550 i f obV. < 8 > O- 1 then9osub 19800 : P r i nt " =1 
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Noti 1 •'avete ! ! " • 9oto5080 

11560 1 + ob';’ '• 8 '• =— 1then9osub35100 : p r i nt " 3" 

: Pr i nt"roPrio un co 1 tei lo "n$; "?'' 
11570 ifob’iC8>=-ltheriPrint"(5C"' un Per am 
bizioso/ rioo i p are?" 9oto5000 
11580 ) fob/J 8 > O- 1 thengosu.b 19000 : P r i nt " 1 
Non 1 avete 1 !"•9oto5000 
11590 i f'P =24andob'; ( 7) =-1 then9osu b 18000 : p 
r i nt " ilEe 11 a P ensata ! " : 9oto 13030 
11600 ifp=74?ndob';(7> =-lthen9osub35100 : p 
r int"Print" a ©e11a pe osata!":9oto13510 
11610 fori=lto9 
11620 if ob#<ì>=no#then11630 
11630 if obM(i> 1fthen11660 

11640 nexti 

11650 9osub19000 : P rint" IMon ha senso usa 
re ciò 1 ":9oto5000 

11660 P r i n t " i 8C o rn t- p e n s- a t e d i u s a r e t a 1 e 
"■nof : 9osub18000 ; 9oto5000 


Questo modulo è un modulo standard che segue la stessa strutturazione di molti altri, 
e si occupa del comando USA. Ho concentrato l’attenzione sull’uso della mitraglietta e 
del coltello, dato che questi sembrerebbero essere gli oggetti più logici. 

Notate che le ultime due linee del modulo permettono di riconoscere un oggetto come 
valido (linea 11650) e quindi di essere riconosciuti (linee 11660). 


MODULO 14.3 


1 9oto3 


2 save"@0 : mi4 

3 rem 


8 : ver i f y "m 14. 3 ".. 8 : stop 


7670 ifve#*"fuoco"then12700 

7680 i t"ve#= " sP ara " orve#* " m i tra.91 i a " then 1 

2300 

7690 ifve#="P ugna 1a"orve#*"1 3 9 1i 3 "then12 
760 

12670 rem*# 

12680 r e m f a r f u o c o / P u 9 n -alare 
12690 rem*# 

12700 i fp =24andob/i ( 7 > =-1 and 1 ef’t# < no#.. 5 > = 
"mitra"then13030 

12710 if'P =28andob"i(7>=-land 1 eft# <. no#, 5> = 
"mitra"then12520 
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12720 ì f P =74andob V. < 7>=-l .a nd 1 ef t$ < no*, 5 > = 

" rn i tra " then 13510 

12730 1 f P = 9 2 a ri d o b V. < 7>=-la n d 1 e f t $ ( ri o $, 5 > ~ 

" rn i tra " then 13730 

12740 i f 1 ef t* ( no* . 5 > = "rni tra " andob/i < 7 > O- 
11 h e n p r i n t " o n l ''' a v e t e ! " : 9 o t o 5000 
12758 9osi j .b 18000 : P r 1 nt " ENo n v i sara d " a 
iuto." : 9oto5000 

12760 i fP =28aridob'i C 8 >=-l then 12580 
12770 i fr io$= " co 1 te- Ilo" aridob^ < 8 > O-1 thenP 
rint"aHon 1 / avete !" : 9oto5000 
12780 9oto12750 

Un’altro modulo standard che è un duplicato del Modulo UCCIDI, ma che vi permette 
di eseguire i comandi SPARA, MITRAGLIA, PUGNALA, TAGLIA e quindi indirizza il 
programma. 

La locazione dei frutti e delle noci 

I frutti e le noci sul cespuglio situato subdolamente nel deserto hanno un significato 
speciale. Una volta mangiati potete togliervi la tuta spaziale senza respirare l'atmosfera 
velenosa (qui dovete crederci!), e se non vi togliete la tuta spaziale non potete baciare 
Aurora e fuggire. 

La programmazione di questo modulo sul 64 ha richiesto un parto del cervello ed un 
lavoraccio fino a tarda notte! Dovevo disseminare linee nel modulo PRENDI in modo 
abbastanza considerevole dato che avevo bisogno di poter far fronte a situazioni in cui 
qualcuno avrebbe provato a prendere le noci e i frutti nella Locazione 37, oppure 
mangiare i frutti o le noci in questa o in un’altra Locazione. Allo stesso tempo dovevo 
anche prepararmi al ritorno del giocatore alla Locazione 37 una seconda o terza volta, 
e al tentativo di prendere o mangiare le noci e i frutti una seconda, terza o quarta volta. 

II risultato è il Modulo 14.4. 

MODULO 14.4 

1 9oto3 

2 save " 00 : rnodu. 1 o 14.4 " 8 : ver i f y " rnodu. 1 o 14. 

4",8 : stop 

3 rem 

6688 i f i $= " mari 9 i a " thenP r i nt " Cosa v i Pi ac 

crebbe man9iare?" 9oto5008 

7650 ifve$="man9ia"then31600 

11720 i fP =37and l ef t$ ( no$ .. 5 > = " frutt " then 1 

1860 

11750 ifP=37andno$0."noei"then11800 
11760 i f P =37and 1 ef t$ ( no*, 5 > O " fru.tt ” then 


173 



11800 

11770 ì fP =37andno$= " noe i " then 11790 
11780 9oto11800 
11790 ifP=37andz=1then11880 
11860 ifz=1then11880 
11370 9oto11830 

11880 9osub 18000 : Pr i nt " sF'rova a man9 i are 
"no$ : 9oto5000 

12060 ì fob’; ( 6 > =-1 andno$=" tuta-sP az i a 1 e " t 
hen31500 
31470 rem#* 

31480 rem se rimuovete la tuta 
31490 rem#* 

31500 i f P =58then 12080 
31510 ifP=59thenl2080 
31520 ifPO2then31000 
31530 i f'P =2then 12080 
31570 rem#* 

31580 rem se marciate le noci 
31590 rem** 

31600 i f"no$= " noe i " or n l eft$ ( no$ .• 5 ) - " frutt 
"ther.31620 

31610 9osubl9000 ; Print ,, S*Juh! Perche' voi 
ete mangiare SìuestoaT?" : 9oto5000 
31620 i f P =37thenp r i nt- " ;10k aa. Mm ! buon saP 
ore !"•9oto31650 

31630 ifobX<3)*-1 thenPrint" WOk ay. Mrn ! buo 
n sa.P ore ! " : 9oto31650 

31640 i fob/J < 3 > O-1 then9osub 19000 : P r i nt " I 
Non avete nessun 11 J nof : 9oto5000 
31650 ifz=1then31700 

31660 9osub35100 : P r i nt " 3" : P r i nt " r Àl sP i rat 
Oj muovete Questo " j n$ 

31670 PrinfliPotreste Provare una stran 
a sensazione Percorrervi il corpo " .> 
31680 Print" e Potete respirare (felicem 
ente) senza la vostra " 

31690 P r i nt " tuta. Potete to91 i er la. " : ob"i 
<3)=0 : z=l : t"v=2 : 9=9-1 : 9oto5000 
31780 9osub18000 ; P rint"SWQuesta volta no 
n sembra diverso, "j 

31710 Print"Blocca ancora il vostro sens 
o d i fame. " : obV. C 3 ) =0 : 9oto5000 
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Linee 6880 e 7650: I comandi 1$ e VE$. 


Linee 11720-11790: Queste linee sono mescolate alle linee standard del modulo 
PRENDI (modulo 10.3). Fondamentalmente esse vi permettono di battere PRENDI 
FRUTTA o PRENDI NOCI sia nella Locazione 37 che in qualunque altra Locazione. La 
variable Z è riportata a zero finché non avete mangiato le noci la prima volta - dopo di 
che viene rimessa a 1. Ciò fa cambiare la ripetizione (come vedrete tra un momento). 

Linee 11860-11880: Sempre nel Modulo “PRENDI” la Linea 11860 inizia con un 
controllo della variabile Z. Se Z = 1 allora la risposta alla linea 11080 è già tentato di 
mangiarli”. La ragione di ciò è dovuta alla situazione in cui il giocatore prova a prendere 
le noci una seconda volta, dopo averle già mangiate. 

Se Z = O allora al comando “PRENDI FRUTTA" il programma torna alla Linea 11830 
che è la parte “OKAY" del modulo “PRENDI". 

Linea 12060: Questa Linea viene dal modulo BUTTA e si riferisce alla situazione in cui 
decidete di lasciar cadere o togliere la tuta spaziale prima che abbiate mangiato le noci. 
Vi manda alla linea 31500. 

Queste prossime due sezioni del Modulo 14.4 servono a far fronte al fatto che voi 
provate a togliervi la tuta spaziale troppo presto - morireste nell'atmosfera venefica... 
a meno che non abbiate mangiato le noci. 

Linee 31500-31530: Ovviamente vi potete togliere la tuta sulla navicella spaziale - 
quindi le linee 31500 e 31510 si occupano di ciò. La variabile FV controlla il fatto di 
mangiare i frutti o le noci (un valore zero significa che non avete ancora mangiato, 
mentre 2 vuol dire che avete mangiato). Quindi la linea 31520 vi invia all’area “VOI 
MORIRETE" e la linea 31530 vi invierà alla risposta “OK" nel modulo BUTTA. 

Linee 31600-31610: In risposta al comando MANGIA la linea 31600 controlla se NO$ 
è NOCI o FRUTTA. Se no andate alla risposta standard “HUH! PERCHÉ VUOI 
MANGIARE CIÒ?” nel caso in cui il giocatore batte “MANGIA ALIENI" o qualche altro 
sciocco comando. 

Linee 31620-31710: Questa situazione fa fronte alle seguenti situazioni: 

1. Voi mangiate le noci senza averle prima prese (nella Locazione 37) - Linea 31620. 

2. Voi mangiate le noci dopo averle prese (che può succedere in qualsiasi Locazione) - 
Linea 31630. 

3. Voi provate a mangiare le noci fuori dalla Locazione 37 mentre esse non sono nel 
vostro inventario - Linea 31640. 

4. Voi mangiate le noci una seconda, terza, ecc., volta - Linea 31650. 

Notate che la linea 31690 contiene alcune variabili che fanno quanto segue: 

1. Tolgono le noci dall'Inventario 

2. Impostano Z a 1 

3. Impostano FV a 2 per permettere di togliere in sicurezza la tuta spaziale 

4. Sottraggono 1 a G (la variabile inventario). 
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Uomo straordinario! 


Questo deve essere il momento più importante del gioco - voi avete trovato Aurora e 
l'avete salvata. Ho voluto qualcosa di speciale per rimarcare il momento del trionfo, e 
ho deciso di ampliare la programmazione per il momento del bacio includendo suoni e 
immagini che siano veramente speciali. Questo modulo finale riguarda questo momento. 

MODULO 14 5 

1 9oto3 

2 sa ve"@0 :m14.5 M ,8 : verify" m 14.5 ", 8 = stop 

3 rem 

7730 ì fvef = "bac i a"andP =92andno$="aurora" 
then14009 

7740 i f ve$= " bac i a " andobX< 3 > =-1 andno$~ " au 
rora"thenl4210 

7750 i f ve$=" bac ì a " then9oto7810 
7760 i fP O92then7730 

7770 if vet= "abbraccia"orve#*"ama"orve$=" 
str i ri 9 i " then9o to7800 

7780 ifve#="abbraccia"orve$="ama"orve#*" 
str i ti 9i " theri9oto7810 
7790 9oto7890 

7800 9osub 18000 : P r i nt " IMon e abbastanza 
soc i evo le. Tenta de' 11 a 1 tro. " : 9oto500@ 

7810 9osu.b 19000 ; P r i nt " 1R9 i te i n modo un 
PO' strano ";n$ : 9oto5000 
13970 rem*# 

13980 rem bacia la Principessa 
13990 rem** 

14000 i fob'/. 6 > 1 then9osub 19000 : P r i nt " BjN 

on Potete baciarla con la tuta"; 

14010 i fob'i <6>=~1 thenPrint" > vero? Avevo 
Pensato che lo sapeste!" 

14020 i fobri! < 6 >=-1 thenPr i nt " Sta indicand 
o le sue labbra. : 9oto500@ 

14038 f or 1 =0to24 • P ok esc+1.- 0 : next 1 
14040 P ok e 13 .■ 3 : P ok ew3 .• 16 : P ok esc+3. 1 • P ok e 
vo .■ 143 : P ok es 1 .• 240 : P ok esc+4 .< 65 
14050 f r=5389 : f ort= 1 to200 : f 4 =f'r+P eek ( sc+ 

27>*225 

14060 hf=int<f4/256>: 1f=fq-hf*256 
14070 P ok eli,. 1 f : P ok eh 1.. hf 
1408 0 n e x 11 
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14030 P r ì fi t c h r $ ( 13 > 

14100 fort=1to5 

14110 P r i rit " TRMUOMO S STERRI E ILE 3 S! M S" 

14120 f o r m =11o500 : nextm 

14130 Print"W 

14140 f o r rn = 11 o 5 0 0 : n e x t ni 

14150 nextt 

14160 Pokevo.*0 

14170 PririffiiiCio'' non vi ha dato solo 
un Potere Positivo.* ma 91 i indi9eni ".* 
14180 Prinf'vi stanno sorridendo. Potete 
f'u99ire con aurora. " : nv=2 : Pr=2 
14130 Print"3El»l0ra dovete tornare all "a 
stronave e completare la vostra ".*' 

14200 Print"missione. Non dimenticate di 
Prendere aurora !" : 9oto4320">" 

14210 9osub13000 : Print"SMm! Bene. Ma dov 
reste esercitare la mente 11 * 

14220 P r i nt " a 1 9 i oco " ; rcf : 9oto4320 


Linee 7730-7750: In risposta al comando BACIA queste tre linee tanno fronte a tutte le 
possibili eventualità. La prima è per baciare Aurora all'Interno della capanna, la seconda 
di baciare in qualunque altra parte del gioco, e la terza di baciare chiunque o qualunque 
cosa. 

Linee 7800-7810: Se cercate di abbracciare Aurora la risposta è "NON ABBASTANZA 
CORDIALE - PROVA QUALCOS'ALTRO". Se voi provate a baciare qualcun’altro o 
qualcos'altro, allora la linea 7810 ritorna con “TI STAI COMPORTANDO IN MODO UN 
PO’ STRANO”. Questa linea sembra essere apprezzata dalla gente che ho visto 
giocare. 

Linee 14000-14020: Queste linee danno una risposta se voi provate a baciare Aurora 
con la tuta spaziale indossata. C’è un sottile suggerimento nella linea 14020 - “lei sta 
indicando la sua bocca” che potrebbe significare molte cose, ma il significato di 
riferimento al comando “mangiare noci”. 

Linee 14030-14220: Eccoci! Il bacio! Prima abbiamo un effetto sonoro simile ad una 
scala che sale e poi scende, quindi le parole “UOMO STRAORDINARIO" lampeggiano 
cinque volte sullo schermo. La linea 14110 contiene il reale “UOMO STRAORDINARIO”, 
ma è stato scritto con sìmboli grafici. Premete shìft. 

Finalmente appare un messaggio circa gli alieni diventati amici e voi potete partire con 
Aurora. 

Linee 14210-14220: Sono giusto qualche cosa in più - nel caso in cui decidiate di 
baciare Aurora di nuovo in qualunque punto del programma. 
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Prova dei moduli 14 1-14.5 

Non avete bisogno di provare questi moduli separatamente perché avete finito il gioco. 
Tutto ciò che dovete fare è trovare rapidamente la vostra strada per la capanna, salvare 
su nastro, quindi provare a congratularvi, abbracciare, baciare, ecc.. sia dentro che 
fuori dalla capanna Devono arrivare le risposte appropriate. 

Sommario 

Questo capitolo vuol farvi capire l'importanza di fare sempre quel qualche cosa in più 
ogni volta - in questo caso il bacio. Ho trovato che aggiungere la musica e le immagini 
non comporta troppo lavoro e tempo nella correzione degli errori e nelle prove. E da al 
vostro programma questa raffinatezza. 

La maratona è finita, il gioco è completo. Rilassatevi e provatelo per un po’ decidendo 
se volete cambiare qualche linea e aggiungere il vostro tocco personale prima di 
provarlo sui vostri amici. Soprattutto Buon Divertimento. 
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CAPITOLO 15 

GUARDANDO AL FUTURO 


Estendere il 'Pianeta dell’lncubo’ 

Adesso che avete finito il libro non dovete fermarvi qui. Potete provare ad estendere il 
programma. Potete aggiungere o toglier Locazioni. Potete render possibile giocare 
come uomo o come donna (provando ad agguingere alcune variabili in più come 
cambiare Aurora’ con PS), quindi avere l’input “sei maschio o sei femmina?” all’inizio 
e cambiare le variabili di conseguenza. Ci sono diverse possibilità aperte. 

Mi vengono alcune idee mentre sto scrivendo. Magari il vostro eroe potrebbe avere 
delle bombole di ossigeno che sono in pericolo di svuotarsi - a meno che egli non trovi 
altro ossigeno da qualche parte nell'Adventure. Cosa ne pensate di un indizio nello 
stagno in quella radura della foresta? Magari la gemma potrebbe essere utile dopo 
tutto... a salvare Aurora! Sono sicuro che potrete pensarne ancora. 

Ho già menzionato il problema della memoria - ma se togliete tutte le istruzioni REM 
trovate che vi rimangono ancora un po' di byte extra. Perché non creare la sequenza 
dei titoli e poi ricaricare il programma appena dopo questi? Perché non avere una sezione 
completa dell’Adventure sottoterra (passaggi che portano ad una città sotterranea che 
raggiungete andando “giù” nelle rovine del tempio) che viene caricata dopo che voi 
andate in una certa locazione del programma. Le possibilità sono limitate solo dalla 
vostra mente ed immaginazione. 

Il 64 può darvi grafici, sprite e suoni. Usateli. 

Tornando a voi 

Solo voi potete sedervi e creare la vostra trama, scrivere la vostra storia, programmare 
il vostro Adventure. Non sconcertatevi dalla lunghezza del mio programma - il vostro 
primo può essere metà della lunghezza, anche un decimo. Ciò che importa è che voi 
proviate. C’è una fortissima sensazione di realizzazione quando cominciate a scrivere 
le vostre Istruzioni, e cominciate a mettere e togliere cose, lo so che voi potete ricordare 
il momento in cui il vostro primo programma è andato bene. È come sentire per la prima 
volta un disco che vi colpisce - e quando lo risentite e ricordate la prima volta, avete 
quasi la sensazione di tornare indietro nel tempo, di risentire il profumo dell'aria e 
rivedere il luogo. È come la prima volta che siete andati in bicicletta, ma meglio, perché 
il programma è proprio vostro - nessun altro ha mai scritto esattamente le stesse cose. 
E strano ma vero! Il vostro primo Adventure vi darà più soddisfazione (molta di più) 
del completamento di "Il Pianeta Dell’lncubo”. E non preoccupatevi dell'abilità nel 
Programmare - io stesso, quando ho cominciato a scrivere questo libro non ero molto 
bravo - ma ciò non è veramente una difficoltà. Se scrivete una storia veramente buona 
mandatemela al Sunshine Books io sono ancora fondamentalmente un giocatore col 
gusto per gli Adventure. 
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CONCLUSIONE 


Questo libro è stata un’impresa ritemprante per me - ed anche una bella esperienza. 
Ho tentato molte e molte volte, di cercare ed eliminare gli errori, sia nella parte 
programmatoria che nel testo. Ne avrò inevitabilmente lasciato qualcuno. 

I miei più sentiti ringraziamenti vanno a tutti coloro che mi hanno aiutato nel giocare e 
scrivere il programma. Quando cominciai non sapevo se ce l'avrei fatta, ma così è stato. 
Ho imparato a conoscermi, come si scrive un’Adventure e a migliorare le mie capacità 
di programmazione lungo la via. 

Considero anche le Adventure il mio gioco preferito. Sembra che sia così anche per 
molte altre persone. Divertitevi a creare la vostra. 
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APPENDICE A 


TABELLA DELLE VARIABILI PER IL PIANETA 
DELL’INCUBO 


V L'indirizzo di partenza del chip video (V = 53248) 

SC L'indirizzo di partenza del chip sonoro (SC = 54272) 

BS L’indirizzo di partenza del colore del bordo dello schermo (BS = 53280) 

BC L’indirizzo di partenza del colore del centro dello schermo (BC = 53281) 

SS L'indirizzo di partenza dello schermo (SS = 1024) 

CS L’indirizzo di partenza della memoria colore (CS = 55296) 

VO Volume del suono (VO = 54296) 

W1 Forma d’onda della voce 1 (W1 = 54276) 

W2 Forma d’onda della voce 2 (W2 = 54283) 

W3 Forma d'onda della voce 3 (W3 = 54290) 

Al Attacco/Decadimento per la voce 1 (Al = 54277) 

A2 Attacco/Decadimento per la voce 2 (A2 = 54284) 

A3 Attacco/Decadimento per la voce 3 (A3 = 54291 ) 

51 Mantenimento/Rilascio per la voce 1 (SI = 54278) 

52 Mantenimento/Rilascio per la voce 2 (S2 = 54285) 

53 Mantenimento/Rilascio per la voce 3 (S3 = 54292) 

HI Alta frequenza per la voce 1 (HI = 54273) 

H2 Alta frequenza per la voce 2 (H2 = 54280) 

H3 Alta frequenza per la voce 3 (H3 = 54287) 

LI Bassa frequenza per la voce 1 (LI = 54272) 

L2 Bassa frequenza per la voce 2 (L2 = 54279) 

L3 Bassa frequenza per la voce 3 (L3 = 54286) 

PR Posta a 2 quando la Principessa viene salvata 
CV Posta a 2 quando viene trovato il cristallo 

SV Posta a 2 quando viene ucciso il serpente 

EV Posta a 2 quando viene uccisa l’anguilla 

QV Posta a 2 quando vengono superate le sabbie mobili 

DV Posta a 2 quando è stato ucciso il Dinosauro 

NV Posta a 2 quando i selvaggi sono amichevoli 

FV Sono state mangiate le noci 

ES Posta a 2 quando viene uccisa l’anguilla 

Posta a 1 quando l’anguilla vi impedisce di muovervi 
NP Posta a 1 quando siete stati una volta nella capanna 
NA Posta a 1 per consentire di muoversi dalla capanna 

Z Posta a 1 quando sono state mangiate le noci 

RC Posta a 2 per impedire il movimento dalla locazione 28 

HH Posta a 2 quando Aurora è nell’astronave 
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YY Posta a 1 quando l'anguilla impedisce la risposta al comando “GUARDA” 

HR Posta a 2 quando Victor non vi aiuterà 

P La posizione della locazione corrente 

P2 La posizione della nuova locazione 

OB% Valore intero di un oggetto nel vettore degli oggetti 

OB$ Descrizione in una parola dell'oggetto 

Sl$ Descrizione lunga dell’oggetto della locazione 

A$ Variabile locale per attendere l’input 

N$ Nome del giocatore 

1$ Comando atteso dal giocatore 

VE$ Verbo atteso in un comando di due parole 

NO$ Sostantivo in un comando di due parole 

PI Variabile locale usata per separare 1$ 

SP Variabile locale usata per separare 1$ 

M Variabile locale usata per creare un loop di temporizzazione per la pausa 
G Variabile locale usata per aggiungere oggetti nell’inventario 

I Variabile locale usata per contare gli oggetti nel vettore egli oggetti 



APPENDICE B 


TITOLI 
DI TESTA 


SIETE 

MORTO 


VARIABILI 


EFFETTI 

SONORI 


TITOLO 

PAGINA 


SCRITTURA 

TITOLO 


RUMORE 

ASTRONAVE 


S PER 
INIZIARE 


ROTTURA 

ASTRONAVE 


SCRITTE 
DI VICTOR 


I NUMERI DI LINEA 


C 130 J 


( ) 









C ,9 ° ) 

CD 







DATA 

PER GLI 
OGGETTI 


( 3700 ^ 

Q 280 ^ 





Q 360 ^ 

POSIZIONE 

E 

LOCAZIONI 


^ 4000 ^ 






LOCAZIONE 

DEL- 

LOGGETTO 


^ 4150 ^ 

( 1000 ) 







PUNTATORI 

PERICOLI 


^ 1300 ^ 

^ 4200 ^ 







USCITA 


^ 2030 ^ 

^ 4320 ) 







INPUT 

“ISTRUZIONI" 


^ 2100 ^ 

Q 5000 ^ 







LOOP 

DEL¬ 

L'ANGUILLA 


^ 2170 ^ 

( 5070 ^ 







LOOP 

DELLE 

SABBIE 

MOBILI 


^ 2400 ^ 

5200 ^ 
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NON PUOI 

PRENDERE 

CRISTALLO 


SCALA 

ALBERO 


DESCRIZIONE 

SABBIE 

MOBILI 


DESCRIZIONE 

DINOSAURO 


DESCRIZIONE 

NATIVI 


RITORNO 

ALLA 

CAPANNA 


PRESA 
ILLEGALE DI 
AURORA 


TROVATO 

AURORA 
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ISTRUZIONI 

GENERALI 












APPENDICE C 

DIAGRAMMA DI FLUSSO COMPLETO PER IL 
PIANETA DELL’INCUBO 
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APPENDICE D 


PROGRAMMA A COMPETO 


1 9oto3 

2 save 11 @0 : moda 1 o 1.1 y ".. 8 : ver i fa " moda l o 1 

3 rem 

99 rem*###############**###*##*##*###### 
******************** 

100 rem 9ioco d '' avventura 

101 rem********************************* 
********************* 

107 • 

108 : 

103 rem********************************* 
********************* 

110 rem ini z i a 1 izza le variabi1i 

111 rem********************************* 
********************* 

1 d 0 sw.-« = tì ■ muv;-0 

147 : 

148 : 

149 rem********************************* 
********************* 

156 rem Predispone le matrici Per 91i o 
99etti 

151 rem********************************* 
********************* 

160 dim oh'/.( 5>.. ob$<5i.. si$<5> 

170 f or i = 1 to 3 : r e ad otri ( i >.. ob$ ( i ) j s i $ < 
ì> ; next 

180 data 1 co 1 te 11 o 1 4 u. ì c ■' e " un co 1 te 11 o 
190 data 7*fucile* il vostro fucile e"’ 4u 

ì 

20tì data 13 * 9 i o i e 11 o .< P er terra c ■' e un 9 
i o i e 11 o 

207 : 

208 : 

209 rem********************************* 
********************* 

210 rem setta la Posizione 
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211 rem#*##***##*#**###########*######## 

*#***#####*###i******* 

220 P=7 
230 9oto 250 

235 

236 

237 rem*######*#**#**#################*# 
********************* 

238 rem setta la Posizione 

239 rem################################# 
********************* 

24tì P=P2 

250 if P<ll then on P 9oto 6008,6020 , 0.■ 0 
.. 0.. 0.. 6040 .• 6060 ■ 0 > 0 

260 if p<121 then on p-10 9oto tì.■ 0 > 6080 j 0 
.. 0.0.. 0,6100,0 .■ 0 

270 if P<26 then on P-20 9oto 0.• 0 > 8,0,0 

do r 

283 

289 rem#####################*########### 
*#:***#########*###### 

290 rem per stampare l''o99etto nella 9iu 
sta Posizione 

291 rem#*###*#####*#**#**#***#*#*#*#***# 
********************* 

380 for 1=1 to 3 : if ob'i(i> =P then Print 

si $ Ci> 

310 next 

~j O “7 

I 

•“i i”i Q 

389 rem**#***###*****#***#*##****#***#** 
********************* 

390 rem ricerca le Posizioni coi Perico 
li 

391 rem*##*##**#*##**#**##***#***#**#*** 
********************* 

400 if P=2 and sw‘i02 then 7000 
410 if P = 18 and mw*v02 then 7028 
487 : 

48 y 

489 rem#**###**###*#*******#********#*** 
********************* 

490 r e m mo s t r a 1 e o P z i o n i su 11 a d i r e z i o 
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491 rem#########**##########*#*#*#**#*#* 
********************* 

590 Print"Puoi andare a. " ; 

510 if n>0 then Primi" nord"; 

520 if e>0 then Print" est"; 

530 if s>0 then Print" sud"; 

540 i f iti y 0 t h e n p r i n t 11 o v est"; 

545 ^ 

546 : 

547 rem********************************* 
********************* 

548 rem subroutine di istruzioni 

549 rem********************************* 
********************* 

550 Print chr$ ( 13) 

560 ì nP ut " i struz i on i : " ; i $ 



********************* 

590 rem condizioni speciali Per evitare 
La stampa delle direzioni 

591 rem********************************* 


600 if P=2 and sw/102 then 900 
610 if P = 18 and mw‘v02 then 900 

687 : 

688 : 

689 rem********************************* 
********************* 

690 rem testa le direzioni di una sola 1 
ettera Per ì4 

691 rem********************************* 
********************* 

700 if i$="n"ori $= "e"ori t= "s"ori $= "o" th 

en 800 

715 9oto 950 

787 : 

789 rem********************************* 
********************* 

790 rem subroutine del 


movimento 














791 

********************* 

800 if i4="n" and n>0 then P2=P~5 : 9oto 2 
40 

810 if i4="e‘' and e>@ then P2=P+l : 9oto 2 
40 

820 if i#="s" and s>0 then P2=P+5 : 9oto 2 
4y 

830 1 1 1 4 —"o" and w. : 0 then F 1 2 = F‘ — 1 • 9oto -i. 
40 

837 

838 

839 rprfi*ff*f**f*ff*ff*****+*f**ff*fff**f 

**««**«3 ************** 

840 reni se non ci sono locazioni Possib 
ili nella direzione 

841 rem*##*#######****#**#*##*##**#*##*# 
********************* 

850 Print : Pr int"sP iacente - non Puoi Pre¬ 
ndere quella via !!"'9oto 250 

007 

l 

yyy 

889 rem********************************* 
********************* 

890 rem subroutine Per evitare movimenti 
Per sfu99ire al Pericolo 

891 reni********************************* 
********************* 

900 i f i 4= " n " or i f = ,! e " or i 4= " s " or i $= " o " then 
Pr int "non Puoi farlo... ora !!"'• 9oto 550 

937 : 

938 ■ 

999 r e hi ********* * * ******** :* * * * * * *. * * * * * * * 
********************* 

940 reni testa comandi di una sola letter 
a per i4 

941 rem********************************* 
* * * * * * * * * * * * * * * * * * * * * 

950 ifi4--"i" then 2000 
960 ifi4—"a" then 2100 

970 ifi4="nuota" or i4="9alle99ia" and P 
=2 then 2400 
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9y9 r-e-m************^************######## 
********************* 

990 reni su.brout i ne- di controllo Per- duo 
P -9.ro T 0 

991 rem********************************* 

4*;*+*++ ************** 

100y for i = l to le n(i $) 

1010 if rn ìd$<i $ ,i,1> = " " then 1199 
1920 next 

1030 Pr int"Pr e-9o. Puoi usare- due Parole" 

: Qoto 550 
100 1 
1000 : 

1989 rem******************************** 
* * * * * * **************** 

1090 r e m s u b r o u t i ri e P e r c o ti v er t. i r e i $ i n 
vef 6" nO$ 

1091 rem******************************** 
********************** 

1100 for sP=l to len<i$) 

1110 i f m i df i i $ • •= P ■ 1 ')=" " then 1139 
1120 Tiext 

113 0 v e ■ = 1 e f ■t $ i $s P -1 > 

1140 no$=r i 9htf < i S .. < l en < i $ ) -sp > > 

1137 : 

1188 : 

1 199 r pnì******************************** 
********************** 

1190 r e m s u b r- o u t i n e Per s c a ti d i r e v a r i c o 
mandi ve i- 

1191 rem******************************** 
********************** 

1200 ìfvet="P rendi"orve$="acchiaP P a"orve 

$= " afferra 11 orve-$= 11 P or ta " then Liii.00 

1210 i f ve$= " butta " orvef= " P erd i " orve$= " l a 

•=. eia" t h e n 2300 

1220 i fve " ucc idi" then 2500 

1230 P r i n t : P r i n t 1 ' n o n s o c o m e f a r e " .■ v e -$ 

; " : goto 550 

1987 ■ 

19o8 

1989 r em**************************** **** 
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********************** 

1990 rem sezione dell' inventario 

1991 rem******************************** 
********************** 

2000 Print"il tuo inventario e ' : " : iv=0 
2010 for i=l to 3 

2020 if obK<i)=-l then Pr int ob$< i > : iv=i 
v+1 

2030 next 

2040 if iv—0 then Print"niente" 

2050 9oto 500 

2087 : 

2088 : 

2089 rem******************************** 
********************** 

2090 rem sezione di aiuto 


********************** 

2100 if P=18 then Print"Puoi tentare di 
ucciderlo" : 9oto 550 

2110 Print "non Ce' molto aiuto 4ui. ho 
Paura" : 9oto 550 

2187 

2188 : 

2189 rem******************************** 
********************** 

2190 rem subroutine di aìuisizione 

2191 rem******************************** 
********************** 

2200 for i-1 to 3 

2210 if ob$ i = no$ then 2230 

2220 next 

2230 if obx < i )=-1 thenP ri nt"ce 1 ' ha i" : 9ot 
o 500 

2250 ifob’iIO "•Op thenPrint"non e - ’ 4ui" : 9 
Ot-O 500 

2268 P r i nt " ok " : obli ( i > =-1 
2270 goto 500 




2289 re m ********* *** ** * ** ************* * * 
********************** 

2290 rem subroutine del trabocchetto 
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2291 rem#############*######*#########*# 

2300 f'or i = l to 3 

2310 i f ob$ i ) — noì- then 2330 

2320 next 

2330 ifob*;<iK>-l thenPrint"non ce l'hai 
" : 9oto 500 

2340 P r i nt " ok " : obX ( i > =P 
2350 9oto 500 

0007 

I 


2333 


2389 rem 


•è*#####****#********* 

2390 rem subroutine della 

2391 rem****************** 


F' a 1 ij.de 


2400 if ob'i(3)=-ltheri Print"ok - sei soP 
f-.q y v i £ « ij t O " : £ W/i=2 : 9 O t O 5 0 0 
2410 F 1 rint"sei troppo Pesante senza il m 
a.9 i co 9 i o i e 11 o. se i af'fo9ato ! " : stop 

2487 : 

2489 


********************* 

2490 re m s u b r o u. t i ri e dell ' uccisione 

2491 rem**###***##########$##$###$###$*$ 


**************** ***** 

2500 if POIS then 2540 

2510 i f obK '•' 2 .•' =~ 1 then P r i nt " ok " ■ mw?i = 2 • 9 

oto 500 

2520 if ob';<1 > =- 1 then Print"Proprio con 
un coltei lo 9 scherzi !" 9oto 550 
2530 Print"non ho niente con cui uccider 


lo !" : 9oto 550 

2540 F 1 r i n t 11 u. c c i d e r e c h e c o s a : ' " • 9 o t o 5 0 0 

5991 : 

5992 : 

5993 rem******************************** 

5994 rem descrizione delle varie luo9hi 

5995 

mmmmmmmmw.mw.rn 






5997 rem***************** 

5398 r €'pì 1 u.o9o 1 
5999 rem***************** 

6808 pr i nt-" 21 = iete i n n n camPo." 

6010 n =0 e =2 s= 0 ' 1 . 1 . 1~0 : goto 508 

6017 rem***************** 

6018 rem lu.o9o 2 

6013 rem***************** 

6020 Print "21= iete su un sentiero." 
6030 fi=0 e=0 : S=7 : w= 1 : Qotr. 500 

6037 rem***************** 

6038 rem luo9o 7 

6839 rem***************** 

6840 Pr i nt "2ls i ete in un 3. casa. " 
6O50 n=2 : e=8 : s=0 : w=0 9 nt.n 500 
6057 rem***************** 

6858 rem luo9o 8 
6059 rem***************** 

6068 Print"Slsiete in una foresta. " 
60 i 8 n=0 : e=0 : s — 13 : w=7■9oto 500 

6877 rem***************** 

6878 rem luo9o 13 

6079 rem***************** 

6080 P r i n t ' 1 2ls i e t e i n u n a P i a n u. r a. 1 ' 
6090 n=3 : e=8 : s=18 : u=0:9oto 500 

6897 rem***************** 

6898 rem luo9o 18 

6099 rem***************** 

6100 Print"£t iete Presso un la9o. " 
6110 n=13 : e=8 : s=0 : w=0:9oto 500 


6989 rem*****.*************************** 
********************** 

6998 rem mostra, i Pericoli 

6991 rem******************************** 

********************** 

7000 Print"siete raduti _ ............ 

7010 9oto 550 

7028 Print "un mostro e '' apparso sul \ a 9,~, 
! ! 

i yoy yoto53y 
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PROGRAMMA B COMPLETO 


0 ^ 

100 rem 

110 rem titoli di testa 
120 rem 

130 p r i vit " Si" : P ok e53280 > @ : P ok e53281 > 0 
140 p r i ut " Bsfcb*lsc.s.9 lieti in lontano fu.tu. 


150 9oto280 
160 rem 

170 rem siete morto 
180 rem 

190 p ok ev+21,0 : P r ì nt " BEEltStavo 1 ta 1 o ave¬ 
te superato bene.' vero!? ") nt 
200 -Print"£lÌF‘er fortuna Posso farvi riv 
i vere e r i metter*./ i " ) 

210 Print" al via. " : Pr int"S*irolete ? Cs 


/n) " 

220 9etr$ : ì fr$O " s " andr$0" n " then22@ 
230 ifr$*"s"theri280 
240 i f rt =" ri " then 17570 
250 rem 

260 rem variabili 


£ ( 


0 


280 


rem 

clr : v ='53248 : sc=54272 : bs 


53280 ^ bc=532 


81 

290 Pr*0 : cv*0 : sv=0 '• ev=@ : 4 v=@ : dv=@ : es=0 : ri 

v =0 : ri.3 =0 : nP =0 : f v=0 : rc=0 : y y =0 : hh~0 : hr-0 

300 vo=54296 : W1=54276 : a1=54277 : s1=54278 : 

i,i2=54283 : a.2=54284 : s2=54285 

310 w3=54290 a.3=54291 : s3=54292 

320 h1=54273 ; 11=54272 :h2=54280 : 12=54279 : 

h3=54287:13=54286 


338 rem 

340 rem effetti sonori 


350 rem 

360 f or 1 =0to24 ; P ok esc+1 .■ 0 ; next 1 

370 P ok evo. 15 : P ok ea. 1 .• 255 : P ok ea.2 .■ 255 : P ok e 


a3.. 255 

380 P ok es 1,255 ■ P ok es2 .■ 255 : P ok es3.. 255 
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390 Pokewl , 17 ; Pokew2>33 : PokewS^17 

400 Pokehl , 37 : Pokel1 , 162-Pokeh2..1:pokel2 

,1:pokeh3,2:pokel3,137 

410 9osub35420 

970 rem 

980 rem titolo 
990 rem 

1000 Pokebs, 0 : Pokebc.- 0 : Print"H" : ss=1024 : 
cs=55296 

1010 Poke53272,21 
1020 forì = 1to23 

1030 P ok ecs+40# i.. 4 : p ok ess+40* i.. 102 
1040 P ok ecs+40*i+38 , 4 = P okess+40*i+38 , 102 
1050 nexti 

1070 Priritt«b<8>"aEEHil Pianeta de 11'ine 
ubo " 

1088 p r i nttab ( 2 ) " l»»»BEECHavventura sP az 
io-temporale" 

1090 P r i nt- " " 

1100 Print "«»»!» » M 
1110 Print"l»»»iaB+Ba 
Q" 

1120 P r i nt " HPiifSQBQB " 

1130 Print M W»nKBQB" 

1140 P r i nt " ft WilBKBGB%a »" 

1150 P r i nt " H»ÌNiaB-tB " 

1160 Print" liiilSB&B a 

£ Il 

1170 Print"W»»ilB«B 13" 

1180 Print">»**■! 38" 

1190 P r* i nt;- 11 liEl^S88RBS88S8S8SSSS8SSS!^S8^S8S9SS3SSSSS^S8S8SS8S3Sii 

II 

1200 9osub35000 
1210 form*Ito1500 
1220 nextm 
1230 Pokevo,0 
1270 rem 

1280 rem scritte 
1290 rem 

1300 P ok ebs , 9 : P ok ebe.. 9 

1310 printchrf<147 >: rem Pulisce schermo 
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1320 f'orm=lto200 

1330 nextm 

1340 Poke53272,23 

1350 P rìnttab <. 6 >" «Siete soli nella sala 
di controIlo dell' astronave "; 

1360 Print"Pensando alla ragazza che a 
vete trasportato a Pagamento" 

1370 Print"Usui Pianeta Zen : la Principe 
ssa che ha segretamente rubato " j 
1380 Print"il vostro cuore > ma che e" Pr¬ 
omessa al tiranno di Zen "> 

1390 Print" in matrimonio Politico" 
1400 Printtab(5>"2I , 1a voi siete solo Preo 
rcuPati di Aurora^ non della vostra "j 
1410 Print"abi 1 ita ‘ di Pilota. All/im 
Provviso e senza nessun segnale vi "> 
1420 Print" dirigete verso lo spazio 
Reale troPPo vicini ad un misterioso 
1430 Print" Pianeta - e siete risucchi 
ati dalla gravita/." 

1440 Prìnttab<5 V EForse la vostra mente 
non e' concentrata 

1450 Print"Forse il Pianeta e' troPPo fo 
rte -Non c'e' modo di controllare 
1460 Print"la vostra astronave. Mentre 1 
'ultimo ricordo e' il suolo 
1470 P rint"che s'avvicina velocissimo... 

li 

• ■ 

2000 rem 

2010 rem P reliminari 
2020 rem 

2030 for1-@to24 : Pok esc+1^ 0 : next1 

2040 P ok evo, 15 : P ok ea 1,255 : P ok ea.2255 : P ok 

ea3> 255 

2050 P ok esl ; 128 : P ok es2 ..128: p ok es3, 123 : P o 

k ew 165 : P ok ew2129 : P ok ew3 > 129 

2060 P ok eh 1 .■ 37 : P ok e 11 .■ 162 : P ok eh2 j 1 : Pokel 

2> 12 : P ok eh3 , 2 : P ok e13 > 187 

2100 printtabUl)"«Premi 's' Per iniziar 

P M 

2110 9eta* : i f'afO " s " then2110 
2120 i f a$= " s " thenP ok evo .■ 0 
2130 form=1to150 : nextm 



2159 rem 

216 0 r e m c a d u. t a 

21 1 0 t or 1 =0to24 p ok esc+1 .* 0 : next I 

2180 p ok evo, 15 P ok e a 1, 140 : p ok: e a 2.. 140 : p ok 

e-a3.* 140 • pok es 1 > 0 : pok es2.■ 0 : Pokes3.■ 0 

2190 p ok ew 1 .• 35 : P ok ew2 .* 129 P ok ew3 .-129 

2200 P ok eh1 , 37 : P oke11 > 162 : P okeh2,1 : pok e l 

2, 12 : P ok eh3, 2 P ok e 13.. 187 

2210 P r ì nt " tì" ' P ok ebs.. 0 : p ok ebc, 0 

2220 Prìnt"ifctPfetEl-'ens.o che vi siate sch 

iantati ! ! !" 

2230 form= 1 to 10 00 : nextrn 

2240 P r i nt " fECTiSf/o 1 ete caricare un 9ioc 

o da nastro ? < s o n> •' 11 

2250 9eta.t : i fato"s "andato"n"then2258 

2260 i f a$= " s " thenP ok evo .• Q ' 9os> j.b 16000 

22V0 Print"B&EVilVo 1 ete istruzioni (s o n 

’p ‘ 11 

/ ' 

2280 9eta$ : if a$0"s "andato"n" ther.2280 

2290 i fa$= " s " thenP ok evo, 0 •' 9osub 15000 

2370 rem 

2380 rem victor 

2390 rem 

2400 p ok ebs ,.11 : P ok ebc11 P r i nt " Si" •' p r i nt " ■ 
P e r s o n a 1 R o b o t V i c t o r i n o r m a • 11 
2410 Print"51Durante Questa avventura sar 
o' Pronto ad aiutarvi..." 

2420 Pr infarti solito aP Par irò" nei mome 
nti di 9raride tensione e Pericolo!" 

2430 Print"Ma vi saro" sempre appresso.* 
anche se non mi vedete." 

2440 input "abbattete il vostro nome";n$ 
2450 9osub 18000 : Print"asrazie "n$, ". Vi 
terrò" d"occhio !" 

2460 f'orm— 1 to 1000 •’ nextm 

2470 P r i nt " 5ECWSJI n i z i a. 1 " Avventura, a. . . . " 

2480 f o r m = 11 o2000 : n e x t m 
2490 Pokev+21,0 
3670 rem 

3680 rem data o99etti 
3690 rem 

3700 for i = 1 to9 : readob'i < i >ob$ C i > .* s i $ ( i > : 
next i 
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3 710 d a t a. 15 , c o r d a., u. n r a. 11 o si di fi eri a. P r 
e s o a. 1 l a. c c i o nell'’ a. ri 9 o 1 o 
3720 da ta. 28, cr i. st a. 11 o ,1 l cr i sta. 11 o ener 
Setico rifulse di luce- 'nascosta. 

3730 data. 37, noei .• ci sono alcune noci Pe 
r terra. 

3740 da.ta 47, re 1 i 11 o, ineia.mPa.te in un ro 
ttame 

3750 data 53.' Somma ; i 1 riflesso di una. se 
nifi a vi attrae 

376 0 d a. t a 5 8 .■ t u t a. - s P a z i a 1 e, l a. t u t a.—s P a. z i 
ale e’’ qui ancora intatta 
3770 data 59.■ fiitra.> il vostro rnitra. e y pe 
r terra. 

3780 data 69.. co11e 11 o, tra. i sa.ssi c' e' u 
n coltello Preistorieo 

3790 data. 92,aurora,vedete aurora, sana e 
sa. 1 va 
3970 reni 
3980 refi P 
3990 rem 

4000 P=59■Sot04020 
4010 P ~P 2 

4020 if P <111heno n P soto28 0 8 0 .2 00 20. 7 00 80. 
20130 

4030 i f P <211 he no n P -10Sotc-20170,20190202 
10.' 20250 , 20310 

4040 i f P 031 thenonP -20Soto0 > 20360.- 0.. 20380 
.. 20430 , 20480020530 

4050 ifP<41 thènonP-30Soto0..0, 0 .. 0 ,0, 20570 
> 20620.1 20670 

4060 i fp <51 thenonP -40Soto0 .■ 2071 0 .. 20730 .■ 2 

0 r 50 .* 0 .* 201" r 0 , 20820.' 208 r 0 

4070 ifP<161 thenonP-50Soto0_. 20930.. 20958, 2 

1000,21040,21180,21158,21208,21390 

4080 ifP <7 1thenonP-60Soto0,21510,21530,2 

1558,21600,0,21658,21700,2175Q 

4090 ifP <811henonP-70Soto0,0,0,21808 

4100 if p< 91thenonP-80Soto0,0,0,21860 

4110 ifP <101thenonP-909oto0,21910,21940, 

21970 

4120 rem 

4130 rem vedi oSsetti 
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4140 rem 

4150 f or i = 1 to9 : ì f obli < i > =P thenP r i nts i $ C i 
4160 nexti 
4170 reto 

4180 reni puntatori Pericoli 
4190 reto 

4200 ì fP =24andsvO2then9oto30000 
4210 i fP =23andevO'2theri9osub30500 
4220 ìfP =57andfv<>2andobX(6 ><>-1then9ot 
31000 

4230 ì fP =59andòb'- (2) O-1 then9osub32000 
4240 i fP =59a ndP rO2then9osub33240 
4250 i fP =67and4 vO2then9oto32600 
4260 i fP =74anddvO2then9oto32700 
4270 i f P *92andnv02andP =0then9oto33000 
4280 i fP =9 2 a n dnv02 and P = 1 then9oto33060 
4290 rem#* 

4300 rem uscite 
4310 rem## 

4320 Print"«GFotete andare a") 

4330 ifn>0thenPrint" nord".: 

4340 ife>0ther.Print" est"; 

4350 ifs>0thenPrint" sud"; 

4360 ifw>0thenPrint" ovest"; 

4970 rem## 

4980 rem istruzioni 
4990 rem## 

5000 p r intchr $ (13) : x=f re <0> 

5010 ir,Put "SSIstruzi oni : littllll" ; i $ 

5020 P ok ev+21 .• 0 

5030 ifi$=" *"thenPrint"MS" : 9oto5010 
5040 rem## 

5050 rem loop anguilla 
5060 rem## 

5070 ifP=92then5290 
5080 ifP=67then5200 
5090 i fP O28then6000 
5100 ifev=2then6000 
5110 ifP=28andes=2then6500 
5120 q=q + l 
5130 ifq C5then6000 

5140 i f q = 51 henP r i n t " Ii3s t a t e 3 ve r ame n t e 
ndebolendovi.. ; 9oto5120 
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5150 i f q = 10then9osub 19000 : p r i nt " SEcco c i 
o " che vi capita! "ini 

5160 i f q = 10thè Tip r i n t " S i ete st at i s tr i to 1 
ati a morte." : 9oto190 
5170 rem## 

5iy0 rem loop Palude 
5190 rem## 

5200 ìfP =92then5290 
5210 i fP O67then6000 
5220 i fq v=2theìì6500 
5230 q=q+l 
5240 ifq<51hen6@00 
5250 i fq =5theri 13320 
5260 rem## 

5270 rem looP indi9eni 
5280 rem## 

5290 ifP C >921he n6000 

5300 i f n v=21 h e n 6000 

5310 i fP =92andP r--2theri6500 

5320 q=q+l 

5330 ifq<5then6000 

5340 i f q =5then9osub 13000 ■ P r i ut " Brenta ", 
n$ : p r i nt " Ed ora cosa ? " ■ 9oto5320 
5350 ifq=1©andi"bacia aurora"then14030 
5370 i f q = 10then9osub 18000 • P r i nt " iftroP P o 
tardi! Gli indi9eni vi hanno scacciato"; 
5380 ifq=10thenPrint" fuori dalla caPann 
a - non Potete Prendere aurora ".■ 

5390 ifq=10thenPrint"con voi. Meglio and 

ar via e Pensare ad altro 

5400 ifq = 1GthenPrint"P er liberarla."■q=0 

: na=l:nP=l:9oto4320 

5970 rem## 

5980 rem nessuna uscita 
5990 rem## 

6000 i fP =24andsv02then6110 
6010 ifP=28andes“2then6500 
6020 ifP=28andev<>2then6110 
6030 i fP =67andq v02then611G 
6 0 4 0 i f’P —74a riddv y 21 hen6170 
6050 i fP =92andnv02andna= 1 then6500 
6060 i fP =92andnvO2andna=0then6110 
6070 9oto6500 
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6110 1fi$=" n " ori$="e"ori$="s"or i$="o"thè 
n9osub 19900 : 9oto6130 
6120 9oto6150 

6130 Pr int "Hìoìì Potete fu.99ire di lui ! " : 
P r i n t ' ' ;1D o v e t e P e n sa.re a 11 ; 

6140 P r i nt " :;fì ua.1 eoe ' a 1 tro ! " : 9oto5000 
6150 1 1"i$= "corr ì " then9osub 19000 Pr i nt " tM 
ori c 'e / uscita di 1 i ' . " ■' 9oto5000 
6160 i f i t~ " carom i na " then9osub 19000 Pri nt " 
Non c e' - uscita di 1 i '. " ; 9oto5000 
6170 1 1" ì " sud " or lì-" s " the n9osub 19000 : P r 
infoiente da f are "; n$ 

6130 ifit -" sud " or i ì~ " s " thenP r i nt " WC •" e " u. 

n d i nosauro su. Ila via!": 9oto500Q 

6470 rerntt 

6430 rero ìf 

6490 remtt 

6500 i f 1 " nord " the-n rt-" n " 

6510 i f i = "est "ther.i ì= "e " 

6520 ifi$="sud"theni $= "s" 

6536 ifìf="ovest"theni $ ="o" 

6540 ifi $= "n"ori $= "e"ori"s"ori $- "o"thè 
n7070 

6550 i f i $=- " i " or 1. ef t$ < i$.. 3 > = " i nv " the n 1000 
0 

6560 ifif="a"ori " aiuto"then11000 
6570 ifj $="istruzioni"then9osub15000 
6530 i f i ì~ " co rr i " or i " carnro i na " then9osub 
13000 : p r ì nt " SKiua 1 e v i a? " : 9oto4320 
6590 it i " 9"or let"t$i$ , 6) = "9uarda"then9 
osub13000 : 9oto6610 
6600 9oto6640 

6610 i f P =28aridy y = 1 thenP r i nt " irnon vedete 
molto sotto acqua!!":9oto5000 
6620 9oto4020 

6640 i t" l eft$< i $ , 4 > = " sa 11 " andP =67then 1331 
0 

6650 iti eft$ i ì > 4 ) — " t i ra " andP = 67theii 1331 
0 

6660 i f 1 et" t$ ( if,5 ) = " 9a Ile" andP =67then 133 
10 

6670 i f 1 eft$ < i ì .■ 5 > = " nuota " andP =67then 133 

10 
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6680 

if i$="m 

an9i 

a" 

th 

lenPr int"Cosa 

. vi Piac 

erebb 

e man9i 

are? 

• il ■ 

90 

ito5000 


6630 

ifletta 

< i $, 

11 

i rr 

: "aPri camera 

andP =57 

then 7 

100 






6700 

ìf1eftf 

(i^ 

11 

) = 

"afri camera 

"andP=58 

then 7 

100 






6710 

if i$="v 

a i 1 

a9o 11 

andP=28andrc 

-~2 then 30 


650 

6720 i f 1 ef t$ i t- , 5 ') — " nuota " andP =28andrc=2 
thè fi30650 

6730 if 1 ef t$< i$, 5> = "tuffa"andP =28andrc=2 
then3@650 

6740 i f i $= " va i 1 3.9o " andP =28then305.10 
6750 i f i ì= " va i r i va " andP028then7810 
6760 i f i f= 11 va i r i va " aridP =28then6780 
6770 9oto6800 

6780 i f'es=2the n9osub 18080 ; 9oto20540 
6730 j. fes<>21he n9osub 13000 : 9oto6130 
6800 i f 1 e f t f ( i $5 > = 11 tì i j. o t a " a ri d P = 2 81 h e n 3 0 5 
10 

681@ if1ef t$<i$ ,5> = "tuffa"andP =23then305 
10 

6820 ifleft $ <i$,3> = "vai"then9osub18000 :p 

r i nt " ilQu.a le di re z i one? " : 9oto4320 

6830 i f 1 ef tf ( i $, 6 > = " vaf f an" then9osub 1300 

0 • P r i ri t " ; JE vo i " fi$ ■ 9oto5000 

6840 ifi $= "save"then17000 

6850 ifì$-"esci"ori $= "fine"then9oto17500 

6860 i f i $=" sca 1 a " then9osu.b 18000 : P r i nt " EE 

osa volete che scali ?" ; 9oto5000 


7000 

if ifO"n" 

and i $ 

“> 11 

£■ “ ■? 

lìdi $ 

il... il . 

and i 

> " n " 

then730@ 







7040 

rem** 







7050 

rem airlock - 

camera 

dee 

omPre; 

:Sione 

7060 

rem** 







7070 

ifP=58and 

if"" o 

"th 

e n 7 

'100 



7080 

ifP =57and 

i$="e 

" th 

en i 7 

100 



7030 

9oto72@0 







7100 

Print" SEte 

i aPr 

e 1 

' a i 

ri oc 

k... " 


7110 

for1=0to2 

4 : Pok 

esc 

+ 1, 

0 : ne 

xtl 


7120 

p okevo , 15 

: P ok e 

al, 

17: 

P ok e 

a2, 17 

: P ok es 

1, 130 : P ok es2 .■ 1 

30 






7130 

P ok ew 1.. 17 

: Pok e 

w2 .* 

17: 

p ok e 

hi, 13 

: P ok e 1 
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1,73 P ok eh2 .• 253 : P ok e 12 .■ 46 
7140 fort=1 to 1590 : nextt : P ok evo .■ 0 : P r i nt " W 

"rem 20 sPazi 

7150 f or t= 1 to700 nextt : Pr i nt"Mair l ock aP 
erta." 

7160 fort=1to700 : nextt : 9eto7200 
7170 rem## 

7180 rem movimento 
7130 rem## 

7200 ifì$="n"a ndn>0thenP 2=P-10'9osub1800 
0■9oto4010 

7210 i f i $■= " e " ande>0the nP 2=P +1 : 9osub 18000 
: 9oto4010 

7220 ifi$="s"ands>0thenP2=P +10•9osub1800 
0 ; 9oto4010 

7230 ifi t- "o"andw>0thenP2=P-1 : 9osub1 8000 
: 9oto401 0 

7240 i f i $= "a.P r i airi ock " andP =57thenP 2=P + 
1 : 9osub18000 : 9oto4010 

7250 ifi $= "aPri air 1 ock"andP =58thenP2= ; P- 
1 : 9osu.b 18000 : 9oto4010 

7260 9osu.b 19000 : Pr int "^SP iacente ~ no n P 
otete andare di li'" : 9oto4320 
7270 rem## 

7280 rem cerca uno spazio su i$ 

7290 rem## 

7300 fori = 1tolen <i%> 

731 0 ifmi d$ <i$,i,1> = " "tben7340 
7320 nexti 

7338 Print"IPotreste usare due Parole?" : 
9osub13000 : 9oto5000 
7340 for 1 =Itolen(i$> 

7350 ifmid$(it, i,2> = " "ther.7380 

7360 nexti 
7370 9oto7420 

7380 Pr int "atE;o lo TSuno S spazio tra Parole 
" : 9osu.b 19000 : 9oto5 00 0 
7390 rem## 

7400 rem i$~ve$&no$ 

7410 rem## 

7420 forsP=Pi +1tolen<i$ > 

7430 ifmid$ <.i$> sP .• 1 >=" "then7450 
7440 nextsP 
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7450 ve#= 1 ef t# < i #, sP -1 ) 

7460 no#=ri9ht#< i#.. < len< i#>-sP > > 
7480 rem ve# 

7490 rem## 


7500 

ifve#= 

"scala"then7920 



7520 

ifve#= 

"P rendi"andP=28then32070 



7530 

if ve# = 

11 afferra"a ndP =281hen3207 

0 


7540 

1fve#= 

" acch i a.P P a " andP =28then32 

070 


7560 

ifvef- 

" trova " then9osub 18000 : P r 

i nt 


Dovet 

e 9u.ar 

dare in 9irò." : 9oto5000 



7570 

ifve#= 

"P rendi"andP = 92then33120 



-7crr*ii-i 

I JO0 

it"ve#= 

"afferra"andP ~32then3312 

0 


7600 

i f ve#= 

"acchiaP Pa"andP=92then33 

120 


7610 

ifve#= 

" P rend i. " orve# 3 " afferra " orve 

#= 

" .acci'' 

iaPPa" 

orve# 3 "P orta"then11700 



7620 

j. f ve#- 

" esani i na " then9osu.b 18000 : 

9ot 

o7 

820 





7630 

ìfve#= 

"butta"orve#="P erdi"orve 

# 3 " 

la 

se i a " 

orve# 3 

"togli"then12000 



7640 

ifve# 3 

" ij.ee idi" orvef - " sfaso i. a " o 

f •ve 

#= 

"dist 

ru.99 i " 

orve#~"rovina"then12300 



7650 

if ve# 3 

11 n i an9ia"then31600 



7660 

if ve# 3 

"usa"then11500 



7670 

i. fve#= 

"fuoco"then12700 



r t‘O0 

if ve# 3 

"sPara"orve#-"mitra91ia" 

thè 

ni 

2300 





7638 

if ve# 3 

" p ij.9 ti a 1 a " or ve# = " t a.91 i a " t 

hen 

12 

7 60 





7700 

if1eft 

# ( ve# ■ 4 > ~ " corr " or 1 ef t# v 

e# .• 

4 > 

=="camm"then 

p r i nt " u a 1 e- v i a ? " : 9oto 

432 

0 

7710 

if ve# 3 

"getta"andP=67then9osub1 

8000 : 

90to1 

3300 




7720 

s 

i f v e # 3 

"9etta"then9osub18000 : 9o 

to7 

36 

7730 

i fve#= 

"bacia"andP-92andno#-"au 

ror 

a" 

thè Ti 1 

4000 




7748 

if ve# 3 

" bac i a " andob’-i < 9 > =-1 andno 

$=" 

au 

r or a " 

thè Ti 14 
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7750 

if ve# 3 

" bacia"then9oto7818 



7760 

i f P 09 

2then7780 



7770 

if ve#= 

" abbra.ee i a " orve#- " ama " or 

ve# 

il 

str 1 n 

91"thè 

n9ot07800 



7780 

ifve# 3 

" abbraccia"orve#-"ama"or 

ve# 

_ il 
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strin9i"then9oto7810 
7790 9oto7980 

7800 9o s u b 18000 P r ì rrt " i H o n e ' a b b a s t a n z a. 

soc i evo 1 e . Tenta, de 11 y a l tro . 11 : 9oto5000 
7810 9osu.b 19000 : Print" Wft gite ìn niodo un 
Po' strano "•n£ 9oto5080 
7820 ì fP =25and 1 eft$ < no$.. 4 ) = " P ort " thenP r i 
nt"Isolo un Palazzo vuoto. : 9oto5000i 
7830 ì f p =28andno$= " l a9o " thenP r i nt " il l cr 
i £ta 11 o e ' p roP r i o 4 u i " : 9oto5008 
i 7 o40 i f'P =37andno$= " cesP u91 i o " thenP r i nt 11 -M 
Le noci sembrano buone. " 9oto5000 
7850 i f P = 3 7 a n d n o $ = " f r u 11 i " t h e n P r i n t " WS e m 
brano commestibi1i."'9oto5000 
7860 P r i n t " W -\o n c ' e n u 11 a d i u t i 1 e 4 u i. 

" 9oto5000 

7865 i f noi 1 - "v i ctor " thenhr=2 ; 9oto 11300 
7870 f o ri = 11o9 : i f ob$( i > »no$t.hen9oto7900 
7880 nexti 

7890 Print"Emetti la di Perder tempo!!" : 
goto5000 

7900 i fot.; 7 < i > =-1 thenP r i nt " il-lon p otete ve¬ 
dere molto 4ui! !" : 9oto12090 
791 £i P r i nt " 3Won l y avete ! 11 : 9oto5Ci0£i 
7920 ifno$<>"albero"then7970 
7930 i f P-42orP =4 orP ~441he n9oto32500 
7940 ifp=52orP=53orP=54orP“55then9oto325 
20 

795i f P =62 o r P = 6 3 o r P = 6 4 o r P =65 1 hi e n '9 o t o 3 2 5 
40 

7960i i f P = 7 41 h e n 13580 

7970 9osub 19000 ■ P r i nt " ;f-lon P otete P roP r i 
o scalare "no-T : 9oto5000i 
7980 90£ub 19000 : P r i nt " ?f?P i acente ! Ma non 
so come " : Printve$ ■'9oto5000 
9970 rem#* 

9980 rem inventario 
9990 re-m** 

10000 Pr i nt : p r i nt" ■!_ •' i nventar i o e■' : : i v= 
01 

10010 fori-ltoS 

10020 ifob 7 .< i > = --11henPrint"Si"ob$< i > ' 9osu 
b 180801 : iv=iv+l 
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10030 nexti 

10040 i f i v=9t h e n P r i n t " fi Hi e n t e - s P i a c e n t 
e. " 

1 0050 9O t O5 000 
10970 rem#* 

10980 r e m a i u. t o 
10990 rem** 

11000 i fhr=2then 11250 

11005 i f P =2 41her 1 9osub35100 : P r i nt " 4J" : goto 
11090 

11010 i fp = 581hen9osub35100 : p r i nt 11 jsg" • goto 
1 1 1 00 

11020 i f P =67then9csub35100 : p r i nt " £1" ■ goto 
11120 

11030 i fP =9 21hen9osu.b35180 : P r i nt " S8" : 9oto 
11140 

11940 i f p = 1 o r P = 2orP = 11 orP = 12 orP = 221 h e n 9o 
sub35100 : P rint"3":9oto11190 
11050 i f P =42orP ~62orP =€3then9osub35100 : P 
rinf'ffl"botoli 170 
11060 9osub351 00 : P rint" S" 

11070 Print"«Ho un Piccolo Problema che 
mi turba "ni 

11088 Print"Tentare di tener testa al vo 
stro Per un Po"..." : 9oto50@0 
11090 P r i nt " •sfT’enta d i ucc i der 1 o " .■ ni : p r i 
nt"Prima che lo f accia lui ! !" : 9oto5008 
111 00 P r i nt " ?Cira P ens a ser i amente "> ni : P 
r i nt "Ci Può" essere Qualcosa, intorno "1 
11110 P r i n t " c h e P u o a i u t a r v i... " : 9 o t o 5 9 
00 

11120 P r i nt " <Bt5 i tuazione d i f f i c i 1 e.. 4 uesta 
" ; ni : Pr i nt "Su.99er i sco di buttare" 

11130 P r i nt " 4 ua. 1 cosa. Per 1 aneiarv i fuor 
i." ; 9oto5000 

11140 P rint" iche " 91i indi9eni P ens 

a n o c he a u ro r a sia 1a 1oro re9ina "; 
11150 Print "e"’ meglio se '.vi fate vedere 
suo amico." : goto5008 

11170 P r i n t " OC i si a m e. P e r d u. t i n e Ila f o r e 
sta ; eh :' 1 Perche non scalate - un " > 

1118 0 P r i n t " a 1 b e r o e 9 u. a r d a t e i n torno. " : 
9 O t O5000 
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11190 P r i nt " BSembr 1 amo P erdu 1 1 e'iìt-.ramb i 
";n$:print"Meglio "; 

11200 p r i nt " i ncamrn i fia.f-c i.. a Ila f i ne trov 
ere te uria ‘.via." 9oto4320 
11250 P r ì nt " Si" : 9osub35100 : p r i nt " uMon s i a 
mo amici. Per il momento " > nt 9oto 11310 
11280 P rìnt”3" : 9osub35100'Prìnt" «Won P ot 
ete uccidermi ";nf 

11290 PrinfotSono il nuovo modello invul 
ner ab ile. Ma..." : 9oto11310 
11300 p r ì nt " B" : 9osub35100 : p r i nt " BC i o no 
n e y carino "jnf 

11310 P r ì nt " Non P osso «3a ì ut arv i 3 Pi u ''. " > 

11320 P r i n t 11 N o n P o t e t e f a r v i f r o r 1 1 e d a 
so1ì.":9oto5000 
11470 remiti 
11480 rem uso 
11490 rem** 

11500 i f p O24orp 074 and ] et" t $ ( no'-f > 5 ’> a " ro i t 
ra"thenl1580. 

11510 i fP O24or-P O749oto 11610 
11520 i + P =24orP =74and 1 ef’tì no$ .• 5 — " m i tra 
"then11580 

11530 i t'P =24orP =74andnot~ " co 1 tc-1 1 n " t,h^n 1 
1550 

11540 goto11660 

11550 i fob V. (. 8 ) O-1 then9osub 19000 : p r i nt " 51 
Non 1'avete ! !" : 9oto5@00 
11560 .i t ob*. o1 then9osub35100 : P r i nt " isj" 

: P r i nt " •aProP r i o un co 1 te 11 o " ; n$ ; " ? " 

11570 i f'ob’i ( 8 > =-11henPr int " ' un po' am 

bizioso. non vi Pare?":9oto5000 
11580 i fob'.' < 7 > O-1 then9osub 19008 : p r i nt " 1 
Non 1 'avete ! !" : 9oto5000 
11590 i t'P =24andob/J < 7 > =-1 then9osub 18000 : p 
r i nt " :lBe 11 a p e risata ! " : goto 13030 
11 Sub i t P =74andob"; ( 7 ) ~~ 1 then9osub3'5100 : p 
r i nt " B" : P r i nt " «Be 11 a p ensata ! " •' 9 --.tr, 13!=i 1 0 
11610 fori=1to9 
11620 i fob$ ( j. > =notthen 11630 
11630 i f ob,’; i > =-1 f then 11660 
11640 nexti 

11650 Qosub19000 :P r 1 nt" fitlon ha senso usa 
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r-e ciò' ! " : 9oto50Q0 

11660 Print"ironie Pensate di usare tale 
"no$ : 9osub 18009 ■' Qot c'5000 
11670 rer‘ì## 

11680 r e n i P r e n d e r e 
11690 rem##' 

11700 f or i = 1 to9 i f ob* < i > =no*then 11740 
11710 nexti 

11720 ifP=37andleft$<no$..5>="frutt M thenl 
1860 

11730 i fob$ ( i ) Ono$then 11850 
11740 ifob’i< i )=-lthenPrint"8Lo avete 9ia 
! !" : 9osub19000 : 9oto5000 
11750 i f P -37andno$<> " noe i " tben 11800 
11760 i f P = 3 7 a n d 1 e f t $ ( n o $ ■ 5 > < > 1 ' f r u 11 " t h e n 
11800 

11770 ifP=37andno$="noei"then11790 
11780 9oto11800 
11790 ifP=37andz=1then11880 
11 800 i f ob“i < i > OP thenP r i nt " UNon vedo " ; n 
o$; " q»j. i . " : 9osub 19000 : 9oto5000 
11810 i f ' 9 > 41 h e n P r i n t " &S t a t e r a c o 91 i e n d o 
troPPo - " 

11820 i f'9 > 41 h e n P r i n t "Dovete 1 a s c i a r e 'l u . 3 . 
Icosa ! ! " : 9osu.b 19000 : 9o*to5000 
11830 Print"BCkaa. " :9osub 18000:obJi(i)=-l 

: 9 = 9+1 

11840 9oto5000 

11850 9osub 18000 •' P r i nt " "tJon vo91 i o P roP r 
io occuparmene ! " > n"! !" : 9oto5000 
11860 ifz=1then11880 
11870 9oto11830 

1188 0 9 o s u b 18 0i 0 0 : p r i n t ' ' W r o v a. a rn a. n 9 i a r e 
";nof : 9oto5000 
11970 rem## 

11980 rem abbandonare 
11990 rem## 

12000 fori=1to9 : ifobf<i>=no$then12040 
12010 nexti 

12020 ifP-28andnof="tuta-sPazia1e"then9o 
sub 190001 9oto3051 0 

12030 ifob$ < i> Onofthen9osub18000 : Print" 
Nessun aiuto 1 ;l " . " : 9osub5080 
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12040 ifob y .( 1)0-1 thenPr 1 nt"$»4on I ■'avete 
a ncor a ! ! ! " 9osub19000 : 9oto5008 
12050 i fP=28andriof = " tu.ta.-sP a.z i a 1 e " thè n9o 
sub 19000 •’ Pr i nt "astate af fondando” : 9oto30 
540 

12060 i fob V. ' 6 ) =-1 andnof =" tuta—sP az i a 1 e " t 
hen31500 

12070 i fP =59a.ndof= " aurora. " then33358 
12080 P rint" HOkaa.":9osub18000 
12890 ob’;,/ i >=p : 9=9“ 1 : 9oto5000 
12270 rem## 

12280 rero uccidere 
12290 rem## 

12300 ifno$="aurora"then9osu.b19008 : print 
" EKState scherzando ! ! ! " ’9otol90 
12305 ifP=24then13000 
12318 ifP~28then12500 
12330 ifP=74then13500 
12340 ifP=92then13700 

12350 9osub18000 : P rint" IWon vedo P roP rio 
n i ente da. ' " ; vei ; "■ 9oto5000 

12470 rem*# 

12480 rem anguilla 
12490 rem## 

12508 i f ve$=" sP ara " orvef = " m i tra.91 i a. 11 then 
12520 

12510 i fobKC8>=~1 thenPrint"B»K. Rvete u.s 
ato i l co l te 11 o. " : 9osu.b 18800 : 9oto 12618 
12528 :i fob'; 7 > =-11hen9osub 18088 : P r i nt " ?II 
l mitra non funziona sott'acqua..."; 
12530 ifob’i<7>=-lthenPrint" e dovete esc 
09itare qualcosa, di meglio..." 

12548 ifob?i<7)=-lthenPrint"State diventa 
ndo Piu/ debole..." : 9oto5080 
12558 Print" Sii. 'a.n9u.i 11 a vi tiene strett 
o e v i str i to l a. " ; 

12568 Print"sempre Piu/... state Perdend 
o ì sensi..." 

12570 form=1to2808 : nextm 
12588 9osub 19800 : P r i nt " iiEt'la l edett i cuochi 
i! Siete morto!" 

12598 Print"SUFlvreste dovuto estrarre qu 
alcosa Per ucciderla!!" 
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12600 9osub19000 : goto190 
12610 Priot"3L■'an9uili-?, si dibatte amPia. 
niente nell'agonia - Poi sprofonda 
12620 P r i nt 11 ne l l a.9o. " : 9osu.b 18080 
12630 P rint"Non diroenticate il crista11o 
..„" : ev-2 : es-2 : rc=0 : yy=8 : 9oto5808 
12670 rem## 

12688 reni far fuoco/Pugnaiare 
12690 reni## 

12700 i fP =24andob7i< 7 > =-1 and l ef t* ( no*.. 5 > = 
" ni i tra " then 13838 

12710 if p= 23andobM< 7) =-1andleft* <no*,5>- 
"mitra"then12520 

12720 i f P—7 4 a n d o b V. 17 ')=-1 a n d l e f t $ '■ n o *, 5 ) -- 
"mitra"then13518 

12730 i f P -92andob"-.' < 7 > =-1 and l ef t* < no*, 5 ) = 
11 m i tra " then 13730 

12740 i f l eft* ( no*.. 5 ) = " m i tra " andob“.‘ ( 7 ) O- 
1 thenP r i nt " If-lon l / avete ! " : 9oto500@ 

12758 9osu.b 18000 : Pr int "SSNon vi sara/ d'a 
iato." : 9oto5000 

12760 i fP -2 Sandob/J < 8 > =- 1 then 12580 
12770 i f no*- " co l te Ilo" andobr.' < 8 > O-1 thenP 
r i nt " Sf-lon l " avete ! " ■' 9oto5800 
12788 goto12750 
12970 re pi## 

12980 rem serpente 
12990 rem## 

13080 ifobli<7>1 thenPrint "SiCikay " : o,-,-i!b 1 
8080 : 9oto13030 

13810 i fob’i < 8 > 1 thenP r int "Avete solo un 

coltello — troPPo Poco !" : 9oto5000 
13020 Pr int "Sfiori avete nulla con cui 
ve*;" y ... e ora ?" : 9oto5@00 
1303y P r i nt " aJI ! serp ente cozza. contro un 
a casa vicina sollevando nuvole di "; 
13040 Print"Poivere in aria, nel rantolo 
mortale." 

13050 Pr int "Contenti di avere questo mi 
tra, "n*:sv~2 : 9oto4320 
13270 rem## 

13280 rem sabbie mobili 
13290 rem## 
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13300 i fob/i<1 > =-1 andino** " cord.?. " thè nP r i nt 
" fi bea. 1 tra mossa " ; nt : 9oto 13305 
13302 9oto7865 

13305 Print"La fané Pende da un albero e 
voi la Prendete. " : qv=2 ’ 9oto4320 
13310 9osub 19000 : P r i nt " Sii ri Questo modo n 
ori vi state aiutando. . . " nt : 9oto50Q@ 
13320 Print"Affondate sempre Piu/!" 

13330 form=1to1000 : nextm 
13340 9osub 19000 : Pr i nt"Glu... 91u... sie¬ 
te P erduti" : 9oto130 
13470 rem#* 

13480 rem dinosauro 
13490 rem** 

13500 i f ob ( 7 ) O-11 he n 9osu b 18080 : 9o t o 135 

40 

13510 9osub 19008 : P r i nt " Sebbene sP arate 
continuamente al me9lio - i vostri 
13520 P rint"colPi rimbalzano suIla sua P 
elle corazzata ! ! ! 11 

13530 Print"Cosa ora "; n $;" ?" :9oto5000 
13540 Prinf'BWon sembrate in realta'' Pos 
sedere il necessario 

13550 Print"Per uccidere una cosi" 9ross 
a bestia"j 

13560 Print"Penso che sarete capaci di e 
vi tarlo e di rimanere vivi!! " ; 

13570 Print "Ma il Problema e" come super¬ 
arlo ! ! " •'9oto5000 
ì 3580 P rint"S":9osub35100 
13590 Print"«Mossa furba, questa ";n$;:p 
rinf'Ora dovete Passare tra 9li alberi " 

J 

13600 Print"e superarlo. Discenderete an 
cor a Piu" avanti. " : dv=2 •'9oto4328 
13670 rem** 

13680 rem indi9eni 
13690 rem** 

13700 if obZ <7 > = -11ben13730 
13710 9osub18000 : P rint" fifone troPPo lont 
ani Per ucciderli! Me91io tentare "; 
13720 Print"un"altra via. Forse aurora p 
otrebbe aiutare ..." : 9oto5090 
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13730 9osub 13000 ; Pr i nt " Sii 1. vostro mi tra 
ha bisogno di molte ore Per "■ 

13740 Pr i nt "r icar ica.rsi doPo la 1 o11a co 
1 dinosauro. 

13750 Print" Dovete Pensare a 4 ualcos'ai 
tro." : 9oto5000 
13970 rem## 

13980 rem bacio a11a Principessa 
13990 rem## 

14000 ifobli < 6>=-lthen9osub 19800 Pr i nt"St-1 
o - n Potete baciarla con la tuta”/ 

14010 i fob V. (. 6 > =~1 thenPr i nt ", vero? fìvevo 
Pensato che lo sapeste!" 

14820 ìfOb/J<61 thenPrint" Sta indicane! 
o le sue labbra. : 9oto5000 
14030 t” or 1 =0to24 ■ r 1 ok esc - ^ 1 .■ 0 • next 1 
14048 P ok e ! 3 .- 3 • P ok ew3 .- 16 : P ok e^sc+3 1 : P ok e 
vo .- 143 ■ F' ok es 1 .* 240 • F* ok e - s-C“^4 .■ 85 
14050 t"r=5389 : fort= 1 to200 : fq =fr+Peek < sc+ 
27 >#225 

14860 hf-int<fq/256): 1f=fq-hf#256 
14078 p ok e 111 f •' P ok eh 1.. hf 
14080 nextt 
14090 P rintchr$<13 > 

14100 f'ort= 1 to5 

14110 PrinfaSSHUiOMOai STERRI EI LEU 3! ! ! 2 T 

14128 form=1to500 : nextm 

14130 Print"M 

14140 form= 1 to500 •' nextm 

14158 nextt 

14160 P ok evo .■ 0 

14170 Print"ifHC io' non vi ha dato solo 
un Potere Positivo.- ma 91 i indigeni 
14180 Print 11 vi stanno sorridendo. Potete 
f'u99ire con aurora. " : nv=2 : Pr=2 
14190 Pr int "ilef mira dovete tornare all'a 
stronave e completare la vostra 
14280 Print"missione. Non dimenticate di 
Prendere aurora ! " : 9oto4328" .i " 

14210 9osub18000 : P rint"SMm! Eene. Ma dov 
reste esercitare la. mente " ■ 

14220 P rint"a1 9ioco ";n$:9oto4320 
14970 rem## 
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14980 reni istruzioni 
14990 rem** 

15000 P rint"S" : Pokebs, 11 : Pokebc,11 : p rint 
tab( 13> " 321 struz i on i S" 

15010 Print"5MMEntrate nel mondo della 
fantasia e avventura".; 

15020 Print" col vostro computer come 9u 
ida. Per superare".: 

15030 Print" 4u.esta avventura dovete dar 
e i comandi - IVSIIIINIM - 
15940 Print "sempre un SSverboBi e Gualche- 
volta un nome." 

15050 Print "Per es : - Prendi mitraBì o r À 
scala albero" 

15068 Print"BiETv'i verrà'' data una descri 
zione del luovo in cui siete 
15870 Print"e delle direzioni in cui Po 
tete andare. Potete usare solo" 

15080 Print" vai SnordK, SSsudfii, gestii o 
ovest. " 

15090 P r i n t " EVIR v o 11 e P o t e t e i. n c o n t r a r e 
un o99etto che Potreste usare 

15100 Print"Piu" tardi durante il 9ioco 
.* Potete racco91 ierio con ".; 

15110 Print" 1 a Paro 1 a SS"Prendi 'Bi o SS" aff 
erra . Potete usa.r 1 o P er " 

15120 P r i n t " SS " P r- e n d i B ì 1 a v o s t r a t u t a o 
•'Porta.'' la Principessa indietro. " 

15130 Printtab<8>"!3TSEPremi un tasto Per 
cominciare" 

15140 9eta$ : ìfa$=""then15140 
15158 Print"BElPotete anche SS" butt a "Bi o 
■'to91i"' un o99etto in o9ni momento " ; 
15160 Print" ed esso rimarrà/ in Guel Po 
sto finchenon 1 o riPrenderete " .• 

15.170 Print"Guando ne avrete biso9no anc 
ora. " 

15188 P r i nt " SliTast i sP ec i a 1 i r i sP arm i era 
nno tempo' Per es : -~" 

15198 Print"(sei»ISna BeS Bea Bfc orafo S Sfei 9 
nificano 

15200 Print"5tr.ordBi, ofe-stBI, ofeudfii r. ofo^Ps 
t. " 
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15210 Prinf WMiS Bivi dar a" un Sii n venta 
rio desìi oggetti che raccogliete." 
15220 Prinf HWBaa significa stuarda Siiti 
torno. " 

15230 Prinf HWSaS «significa Biche voi et 
e aiuto ! !" 

15249 Pr inf BiEltoattete distruzioni Si Per 
avere i nf ormaz i on i genera li." 

15250 Print"BIS e volete salvare il gioco 
battete save" 

15269 PrinfBKe volete finire il gioco b 
attete esci" 

15270 Pr infilo dfineBÌ." 

15280 Prin11ab<8) "!3SEFrerni un tasto" 

15290 9eta$ : ifa$“""then 15299 

15300 Prinf SClJsate solo lettere senza -H 

shitf 

15310 Prinf i n altre Parole battete ’SR&aa 
urora non Trturora. " 

15320 Prinf < notate la Siali , non 
15330 P r i nt " JlSugger i rnent i : ” : P r i nt " 31. Fe¬ 
rmatevi spesso Per fare il save" 

15340 Prinf 2. Tracciate una dmaPPa.Bi meri 
tre esplorate il Pianeta." 

15350 Print"3. Siate Precisi nell' - din ve 
ntario Potendo Prendere solo"; 

15360 Prinf Pochi oggetti alla volta." 
15370 Prinf4. Se volete aiuto battete d 
esamina Per vedere gli oggetti." 

15380 Prinf 5.Ricordate di battere distr¬ 
uzioni se rivolete questi messaggi." 

15409 Prinf SElilBuona fortuna Per la rie 
erca di Aurora".: 

15410 Prinfe fate attenzione agli alien 
i ! ! " 

15420 Print"STSEIfiiiilBatti 'L/ Per tornar 
e al gioco" 

15430 geti$■ifi*O"l"then15430 
15440 ifi t~ "l"thenPrint" 3" : return 
15970 rem## 

15980 rem load (. caricamento^ 

15990 rem## 

16000 PrinfifctUnserisci il nastro e ria 



WG 191 ^ " 

16010 inPUt"Batt 1 SRETURNa:" ; qt 
16020 oP e-ri 1,1.. 0 ."Pi ane t " 

16030 i tìP u t# 1 ■ P r, rv • sv, pv . es, q v.. dv.. nv .■ f v 
16O40 i nP ut# 1 .■ z.. nt.. m . i.. p.. n , e, s.. wit,Pis 

p 

16050 ì nP ut# 1 , ve t , not, 9.. P 2 .• nP > nare.. y y .■ h 
h > hr 

16060 f or i = l to9 : ì nP ut# 1 .■ ob‘: \ i > : next i 
16070 fori=1to9 : inPut#1•obt<i> : nexti 
16080 fori=1to9 inPut#1■si$ \ i> : nexti 
16090 closel 
16100 9osub35420 

16110 P rint"53":P okebs,11 : Pokebe,11 : 9oto4 
020 

16970 rem## 

16980 reni save ''salvare) 

16390 reni## 

17000 Print"5EEiaSiete sicuri di voler sa 
1 vare " P r i nttab(15 ) " i l vostro 9 i oco? " 
17010 PrinfclP reme te Ssa o Sri a : " 

17020 9et a# : i f a* O " s " andato "ri" t ben 17028 
17030 ìfat="n"thenP rint"3" : 9oto4020 
17040 inPut"£f1etti il nastro e Premi «SRE 
TIJRN : "q$ ■' rt=chrt< 13> 

17058 oP en1,1,1,"P1anet" 

17060 P r i nt# 1, P r: rt ; cv ; r$ ; sv ; rt, ev ; rt ; es 
rt ; 4 v ■ rt ; dv ; rt ; nv '• rt ; f v 
17870 P r i nt# 1, zj rt ; ntrt ; m ; rt, i ; rt ; p ; rt ; 
n ; rterts ; rt ; w ; rt ; i t ; rt ; p i ; rt, sp 
17080 P r i nt# 1, vet, rt, not j rtJ 9, rt j P 2 .■ rt J n 
P ; rtri art ; re • rty y ; rt ; hhrthr 
17090 f or i = 1 to9 : P r i nt# 1, ob V .< i > : next i 
17100 fori = 1to9 : P rint#1,obt<i> ; nexti 
17110 f or i = 1 to9 : P r i nt# 1, s i t '■ i ) : next i 
17120 closel 
17130 9osub35420 
17148 P rint"53”:9oto4020 
17470 rem## 

17480 r e m e s c e 
17490 rem## 

17500 pokebs,2 : P okebe,2 
17510 P r i nt " 53" •' P r i nttab C 5 > " EIEEEEi aa S i ete 
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s i cur i " ; n$ " ??" : 9osub 1 3000 

17520 Printtab<5)"SEIBatti BcS Per Bcstont 

inu are : " 

17530 Printtab<5)"SElBatti 3 j.S Per Su Sfeci 
re da 1. 9 loco • 11 

17540 9eta$ •' i f afO " c " .andato " u " then 17540 
17550 i fa* = "u. " the-n 17570 

17560 P ok ebs .-IIP ok ebc, 11 : P r i nt " 5T : 9oto4 
020 

17570 P r i nt " a" : P r i nt " : P ok e53272,21 P ok 
ebs,14 : Pokebc,6 : end 
17370 rem** 

17980 rem beeP 
17990 rem#* 

18000 f o r 1 = 0 1 o 2 4 : P o k e s c +1 .■ 0 : n e x 11 
18010 P ok evo, 15 : P ok e a 1,17 : P ok ea2 .■ 17 : P ok e 
s 1 , 64 ■ P ok es2 , t>4 

18020 P ok ew1,17 Pok ew2, 17 : Pok eh1,17 : poke 
11,195 : Pokel2,6 

18030 t"ort= 1 to 1 00 : nextt : P ok evo, 0 
18040 return 
18970 rem** 

18980 rem burP 
18990 rem** 

19000 for1=0to24:Pok esc+1,0:next1 
1901 0 P ok evo, 15 : P ok e a 1,17 •' P ok ea.2,64 : p ok e 
ad,1 1 -P ok es1,128 Pokes2,128’pok es3,128 
19020 Pokew1,33 : P okew2,33 : Pok ew3,123 
19030 P ok eh1,189 :P okeli,172 :P ok eh2,7 :Pok 
e’ 13 , 233 ' P ok eh3,1 : P ok e 13,19 
19040 fort=1to200 : ne xtt : pok evo, 0 
13050 return 
13970 rem** 

19980 rem luo9hi 
13930 rem** 

20000 rem 1 

2001 0 9osub 22050 : n=0 : e=2 ; s= 11 : 1 , 1=0 : ooto4 
150 

c!00ii'0 rem 2 

20030 Print"liINSsS'lentre avanzate ancora, di 
P iu.•' dei Pezzetti d 1 carta. vi " ; 

20040 Print"attra99ono. In una fessura d 
el muro c 'e ' un messa99io con la " 




20050 P r i nt "9raf i . 3 . d i aurora. Ne Ili ncer 
ta luce Potete "; 

20060 Print"riconoscere Proprio le Paro!, 
e mari9ia noci." 

20070 n=0 ' e=3 : =•= 12 : w= 1 : 9oto4150 
20080 rem 3 

20090 Pr int " ai Fi va ri za ndo sempre Piu" Proto 
•fidamente nel cuore del"; 

20100 Pr int "temP i odi venta buio e uroido. 

Le Pareti sono coPerte con 11 ; 

20110 Print"una fetida melma mali9na che 
sembra Pulsare con luce "; 

20120 P r i nt "ma l ef ica.. " •' n=Ò •' e=4 : s= 13 : w=2 
: 9oto4150 
20130 rem 4 

20140 Print"S#iE" Proprio buio dentro il 
tempio. Il terreno e*" sconnesso 
20150 Print"e sPesso cadete. flPPare un P 
assa99io "; 

20160 P r i nt " verso ovest . " : n=0 : e-Q •' s=0 : w 
=3 : 9oto4150 
20170 rem 11 

20180 9osub 22050 : n=1 :e=12 : s=0 : w=0 : 9oto4 
158 

20190 rem 12 

20200 9osub 22050 : n=2 : e~ 13 : s=22 : w= 1.1. : 9ot 
04150 

20210 rem 13 

20220 Print"didentro al tempio e' troPP 
o buio Per vedere bene. Fassa99i. "; 

29230 Print"sembrano mandare in Parecchi 
e direzioni. Qua 1'e ' la mi91iore?" 

20240 n=3 : e= 14 : s=9 : w= 5 2: 9otr,41 50 
20250 rem 14 

20260 Print "2 Siete in un edificio che P 
are un temPio. "; 

20270 rrint"Sul Pavimento fuori la stanz 
a ci sono se9ni 

20280 pr-int "tracciati sul f'an9o del corr¬ 
idoio. Sembra come una "; 

20290 Print"tracci a Puntata ad ovest den 
tro il tempio." 

20300 n=0:e=15 : s=24 : w=13 :9oto4150 
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sono morte.• dormono solo.»." 

20350 Ti—0 ■ e=0 : s=25 : w= 14 : 9oto4150 
20360 rem 22 

20370 9osub 22050 : n=12 : e=0 : s=0•'w=@ : 9oto4 
150 

20380 rem 24 

20390 Pri nt" slUFivete l^impressione che 4 
i j .a 1 c u. n o v i o s s e r v i n a. se o s t o nelle " 1 
20400 Print"ombre. Nel silenzio volete u. 
ri are; chiamare aiuto.- fare "1 
20410 Print "Qualsiasi cosa Per sa.Pere se 
c'e' r 4ualcu.no di vivo 4u.i in 
20420 Print"4 uesto P osto morto." : n=14 : e- 
25 : s~0 : w=0 : 9oto4150 
20430 rem 25 

20440 Print"SMIl vento fischia deridendo 
vi.- spettrale suono tra le Pareti " ■ 
20450 Print "rocciose.- mentre Passate Per 
stanze vuote.- spalancando finestre. "; 
20460 Print"Solo 4uesto rimane della Pas 
sata civiltà?" 

20470 n=15 ; 0=26 : s=0 : w=24 : 9oto4150 
20480 rem 26 

20490 Print" aiilv'orres te vedere dove si et 
e ; nella citta. - '! Se solo ".- 
20500 Print "Poteste trovare una. vi al ma 
i muri sbrecciati dell'oscura casa 
20510 Print"bloccano o9ni via eccetto un 
intrico di cunicoli verso ovest." 

20520 n=0 : e-0 : s-36 : w=25 : 9oto4150 
20530 rem 28 

20540 P r i n t " SU IS i e te s u 11 a r i v a. di u. n l a 9 
o. Le Pietre nel l - 'a.c4ua. sembrano "1 
20550 Print"riflettere la luce del sole 
come se avessero " 

20560 Print"u.n Potere ma9 ico. " ; n=0 : e-0 : s 
-38 : : 9oto4150 
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20570 reni 36 

20580 Print"aifcfa qui Potete chiaramente 
vedere che le torri e le 11 
20590 Pririt "9u.9l ie sono ora le sbrecci a. t 
e rovine di una. fiera, citta/' "; 

20600 Print" abbandonata da.9l ì abitanti. 

il 

20610 n=26 : e=37 : s=46 : u=0 : 9oto4150 
20620 reni 37 

20630 Print" all nf ine la. sabbia Prende il 
Posto dei ciottoli e sassi ~"> 

20640 Print"^dovrebbe essere il marsine 
del deserto. Ci sono 

20650 P r i nt " a 1 curi i al ber i, simili a. ca.sP 
u.9li con frutti come noci di cocco 
20660 P rint"P endono da essi." : n=0 : e=38 : s 
=47 ; 1.1.1=36 ; 9oto4150 
20670 rem 38 

20680 Print"atlSiete fermi nel deserto, 
fl nord Potete vedere un la.9o. " ; 

20690 Print"fid est il deserto tocca. 1 'or¬ 
izzonte. " 

20700 ii=28 : e=0 : s=38 : w=37 : 9oto4150 
20710 rem 42 

20720 9osub 22110 : n=0 : e=43 : s=52 : w=0 : 9oto 
4150 

20730 rem 43 

20740 9osub 22070 : n=0 : e=44 : s=53 : w=42 : 9ot 
o4150 

20750 rem 44 

20760 9osu.b22110 : n=0 : e=0 : s=54 : u=43 : 9oto4 
150 

ci 0 r r 0 f eni 46 

20780 Print " aifìnche se il sole sta. cornili 
ciandò a crearvi "; 

20790 Print "confusi one nella, mente - all 
'orizzonte nord appaiono 
20800 Print"9u9l ie e torri di una. citta ' 
. O e - ' solo un mira.99io " .■ 

20810 Print"che vi tortura ??" : n=36 : e=37 
: s=56 : w=0 : 9oto4159 
20820 rem 47 

20830 Print"SMentre camminate rapidi sul. 
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1-3. sabbia. rO V Sii te Potete Vedere .- 

20849 Print" i se9ni di dove la vostra a 
5 f. ►- o ti a v e o r a du t a. a, 11 e r r a. n do. " • 

20850 Print"Vi chiedete come farla rifar 
t i re. " 

20860 n=37 : e=46 : s=57 : w=46'9oto4158 
20870 rem 48 

20880 Print"fliUvete camminato Per ore e 
potete vedere"1 

20890 Print" che la vasta distesa di sab¬ 
bi a non ha fine. Infatti sapete che " ; 
20908 Print "se non tornate Presto indiet¬ 
ro morirete a, causa " > 

20910 Print"del l 'ardore del sole che sem 
bra fisso alto nel cielo." 

28920 n=38 : e=8 :s=0 : w=47 : 9oto4158 
20938 rem 52 

20940 9osub 22070 : n=42 : e=53 : s=62 : u.i—0 : 9ot 
o4150 

20950 rem 53 

20968 Print" Siloiete in una P ieco 1 a radur 
a tra. 91 i alberi. Un soffice muschio "; 
20970 Print "ricopre le rive di uno sta.yn 
o azzurro e silenzioso- dalle ") 

20988 Print"acfue immotel rimanete Per u 
n Po" Prima di ricominciare la "1 
20990 P rint"ricerca." : n=43 ; e=54 : s=63 : w=5 
2:9oto4150 
21000 rem 54 

21010 Print"SMMentre lottate con rovi e 
fogliame mandate occhiate "; 

21020 Print"speranzose alla radura verso 
ovest.- ma vi sembra di "1 
21830 Print "non essere capaci di ra.99iun 
cierl a. ! ! " : n=44 : e=55 : s=64 : w=@ : 9oto4150 
21040 rem 55 

21050 Print"»M3iete Proprio nella fores 
ta ora.- con alberi grossi come case "1 
21060 Print "slanciati al cielo.- che imfe 
discono la vista del sole. 

21070 Print"flnimaletti balzano fuori e f 
u99ono davanti a voi." 

21088 Print "Due sentieri si inoltrano -- 
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no a sud l'Altro ad ovest." 

1090 fi=0 : e=56 : s=65 : w=54 : 9oto4150 
1100 rem 56 

1110 Print" SWtBiete al limite di un des 
rto - la sabbia cambia subito 
1120 Print"ìn erba di bosca91ia. Verso 
ovest " • 

1130 Print"un■"oscura foresta riemPie il 
cielo come uno s-Pesso ta.PPeto " .■ 

1140 P rìnt" verde.":n=46■e=57:s=0:w=55: 
oto4150 
1150 rem 57 

1160 P rint" tfiiaOra siete a11'esterno de 
1'astronave. Attorno ci sono tracce "■ 
1170 Print"di bruciature ed i frammenti 
carbon i zzat i dell •" astronave. 3 i ete " .■ 
1180 Print"caduti in un arido deserto d 
sabbia rossastra." 

1190 ,-,=47 : e=58 : s=67 : io=56 : 9oto4150 
1200 rem 58 

1205 i fob?i <2>=-1 a ndob/i < 9 > =-1 then33280 
1210 i fob?i (2 >0-1 then21240 
1220 il"ob ’i ( 2 > = - 11 henPrint 1 'a9nifico ! 
vete i 1 crista 11 o." : cv =2 
1230 Print"flettetelo a riposare nella 
eca ne 11 a cabina Princi.Pa.le-. " : 9oto21380 
1248 i fp r=2andob*; < 9 > =-1 ther.21330 
1250 ifhh=2then21270 
1260 i f'P r=2ar.dob/: < 9 > O-11hen21350 
1270 p r i nt " HÌIS3 i ete ne 11 a cab i na. " 

1280 ifPr=2then21380 

1290 Print"SlSlJna delle tute spaziali ma 
nca. " ; 

21308 Print "Sul Pavimento vedete un bran 
del lo di vestito che 

21310 Print"riconoscete come un Pezzetto 
della Somma che la. Principessa 
21320 Print "aurora indossava. 1 •'ultima 
volta che 1'avevate vista. : 9oto21380 
21330 Print"'!Indietro con aurora - Potre 
i Portarla nella cabina Principale 
21340 Print "e offrirle una tazza di te'’ ! 

!"^ 9oto21380 
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21350 

9osub19000 : P rint" ! 

BEI ii 

rnenticate 

di 

? 

prende 

•re aurora nel vii 

l .3.99 i O " s 



21360 

Print"indigeno "1 

n$ 




21370 

Pr int "Un Po' stu.P 

i do 

- tutto i 

C10 

' | 

* Dove 

■te tornare Per le 

i. " 




21380 

n=0 : e-59 : s=0 : w=57 

90 

to4150 



21390 

rem 59 





21400 

ifcv=2andPr=2then 

332 

80 



21410 

i f ' c v=2 a n d P r < > 21 h e 

n33 

400 



21420 

i f c v=0 a n d P r=21 h e n 

334 

60 



21430 

Pr ini-"ÉClStBiete ne 

Ila 

cabina d. 

eli 

•■'a 

strona 

.ve ; la caduta ha 

SP 

arso " 



21440 

Print" i l con tenui- 

o del vostro 

ba 

ul 

e tu ti 

•o sul Pavimento. " 





21450 

ifPr=21he n 21500 





21460 

p rint"Nonostante 

ciò 

■' scor9et 

e i 

d 

e9ni di una lotta." 





21470 

Print"SM***#La Pr 

i nc 

iPessa e' 

SP 

ar 

ita!###" 





21480 

Print" £15111 1 Panne 

Ilo 

di c ori ir¬ 

oli 

o 

re9ist 

:ra che la cabina 

0 ’’ 

si, ata " 1 



21490 

Print"aperta dall 

'’es 

terno e P 

oi 

ri 

Chi US-3 

i " 





21503 

n~0 : e=0 •' s=0 : i.i=58 : 

9ot 

o4150 



21510 

reni 62 





21520 

9osub 22070 : r.=52 : 

e=6 

3 : c,—0 : u=:0 

: 90 

to 

4150 






21530 

rem 63 





21540 

9osub 22110-' n=0 : e 

=64 

: 3,5=0 : i,i=62 

■ 9o 

io 

4150 






21550 

rem 64 





21560 

P r i n t " 3iLa f or e s t 


•' assolut 

a me 

nt 

e troF 

■Po 9raride Per tro 

'•sir 

» li * 

ir' ,* 



21570 

Print"la via Per 

IJ.SC 

ire.: stai. 

e com 

ineiandò a Preoccuparvi 

ii - 




21580 

P rint"ehiedendovi 

co 

sa mai Po 

tre 

bb 

e succedere. 11 





21590 

n=54 : e=65 : s=74 : w= 

63 • 

90io4150 



21600 

rem 65 





21610 

p r i ri t " 511S7! u e s t o s 

ent 

iero semb 

ra 

co 

ridurre 

} via dal sole.- de 

Titr 

« il • 

' IJ ,i 



21620 

P r i nt " un oscur i t a 

/ c 

:he non Pe 

nsa 

.va 


te P ose ibi I e ne Ila 1 u.ce " ; 
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21630 Print"del sole. Dietro di voi ci s 
orto dei rumori.- come se Gualche "; 

21640 Print "anima, le colossale vi stesse 
seguendo." : n=55 : e=0 : s=0 : w=64:9oto4150 
21650 rem 67 

21660 P r i nt " àPII 1 deserto d i venta a 11 y i mP 
rovviso Pieno di vegetazione"; 

216r'0 Print" che sembra infoltirsi ad o9 
ni Passo. Guardando meglio intorno "; 
21680 Print" - il terreno sembra farsi P 
a 1udoso. "; 

21690 n=57 : e=68 : s=0 : u=n g.-.tr.41 S 0 
21700 rem 68 

21710 Print"s*MSiete in una Palude.- cald 
a/ vischiosa e fastidiosa. 

21720 Print"Potete sentire il rumore di 
un fiume/immenso e veloce."; 

21730 Print" fìd est c y e y il fiume - ad o 
vest la Palude." 

21740 n=0 : e=69 : s=0 : w=67 : 9oto4150 
21750 rem 69 

21760 Print" JIEcosi ' rinfrescante sed 
ere sulla riva del fiume e "; 

21770 Print" dondolare i Piedi bollenti 
nella fresca corrente. Ma il fiume "; 
217y0 Print" e y largo/ come un mare agit¬ 
ato al 1 •'orizzonte. Sarebbe "; 

21790 P rint"imP ossibi1e da attraversare. 

" : n=0 ' e=0 : s—0 •' i/j=68 : 9oto4150 
21800 rem 69 

21810 Print"slitSiete sulla strada verso 
il sud della foresta. Il manto "; 

21820 Print" liscio suggerisce che sia s 
tata fatta da un •'antica civiltà/ "; 

218.30 Print"su.Periore a 4ua.lsia.si altra 
nota. Ma. la. strada e - ' ancora usata..."; 
21840 Print" o e" solo un relitto di 91o 
ria. Passata ?" 

21850 n=64 : e=0 : s=84 : m= 0 : Qot .-.4150 
21860 rem 84 

21870 Print"S»La strada si snoda in una 
verde Pianura ~ indugiando a. nord "; 

21880 Print "e a. sud come una. corda getta 
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ta da aria mano 9i9antesca. " ■ 

21890 P r i nt " Da. 11 ''a. I tra. P arte 1 a. ve9etaz i 
one s i a.vv i c i na v i eP Pia'..." ; 

21900 ri=74 : e=0 : £=94 : w=0 : 9oto4150 
21910 rem 92 

21920 P r int" S»M3iete i ri ana. ca.sa. i nfa.ri9a. 
ta.. Pezzi di terracotta. Preistorica. 

21930 Print" crePita.no sotto i vostri Pi 
edi." : n=0 : e=93 : s=8 : w-0 : 9oto4150 
21940 rem 93 

21950 Pririt"apprendete la. via. Per il vi 
lla.99io sperando che 91 i indi9eni " ; 

21960 Print" siano amichevo1i." : n=0 : e=94 
: s =0 :1,1=92 : 9oto4150 
21970 rem 94 

21980 Pririt" aH3iete fuori la cinta del 
v i 11 a.99 i o. Case sud i c i e " ; 

21990 Pririt "sono sparse intorno alla rin 
fusa.. " 

22000 i fP rO2then22020 
22010 9oto22040 

22O20 Print" Il vi 11 a99 io Pare deserto.- m 
a sentite u.na donna che "; 

22030 Print"canta mestamente in ana capa 
fina. " 

22040 n=84 '• e=0 : s=9 : w=93 : 9oto4150 
22050 Print"SMSiete in una specie di ded 
alo di curve e incroci".: 

22060 Print" temendo non Poco'' di esserv 
i Perduti." : return 

22070 Print" SUF’otete esservi Perduti nel 
la foresta. Date un'occhiata "j 
22080 Print" a Ila r a d u r a.- u n P o" a d e s t .- 
un Po'' a sud. .. ".: 

22090 Print "e sempre il rumore di una 4u. 
alche bestia terribile eche99ia e "J 
22100 Print"vibra tra le fo9lie intorno 
a voi." : return 

22110 Print"SChe foresta - questa ! Semb¬ 
rate def i n iti vanente P erdu.t i.. " 

22120 Print"Forse avreste dovuto rimaner 
e a casa.- senza offrire ".: 

22130 Print"ad Aurora Passa99io sulla vo 
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stra nave !" : return 
29970 rem## 

29980 rem serpente 
29990 rem## 

30000 Print"SFuori le rovine striscia un 
9idantesco serpente - il corpo 
30010 P rint"grosso i1 doP Pio del vostro. 
V i b l occa L un i ca use ita.": goto5000 
30470 rem## 

30480 rem anguilla 
30490 rem## 

30500 Print"SE' molto Profonda nel 1 'acqu. 
a." : return 

3051R i fobJi < 6 > O-1 then9oto30540 

30515 i fve*2then9osu.b 13000 : p r i nt " IBe 1 9 i 

orno Per un tuffo! Cosa ora?":9oto4320 

30520 if'obr.(4)<>-1 then9oto30560 

30530 9oto30590 

30540 9osub 19000 : pr i nt " Wt-lon avete P i u ' l 
•' astronave .■ vero " ; nt 

30550 Print"Maledizione ! ! Siete annegato 
! !":form~1to2000 : nextm : 9oto190 
30560 9osub 18000 : p r i nt " Wj*. 11 e99 i a te come- 
uri sughero. Vi occorre Qualcosa 
30570 Print"di Pesante Per tuffarvi 
30580 Print"9iu/ Per Prendere il cristai 
lo." : 9oto5000 

30590 i f obV. < 2 > =-1 then9osub 18000 : P r i nt " >18 
ella giornata Per un tuffo!!!"•'9otn4320 
30610 es=1 :Print"SRIl'inizio scendete fi 
no a Prendere il cristallo. "; 

30620 Print"fì11'imP rovviso esce da 1 P rof 

ondo una gigantesca anguilla 

30630 Print"e vi si attorciglia intorno. 

li 

30640 Print"Vi sta stritolando.9osub 
1 9000 : rc=2 : q =0 :y y = 1 ; 9oto5008 
30650 9osub 18000 : P r i nt " ilL ' an i ma 1 e- v i h 
a stretto cosi'' forte che "; 

30660 Print"non Potete fuggire i":gotr.5fl 
00 

30970 rem## 

31000 P r i nt " Sii 11 ■' i mP rovv i so v i sent ite s 
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offecare. L"atmosfera 

31010 P r i nt " e ve l enosa. Se non f aret e ri 
nlla morrete Presto..." 

31030 f orm= 1 to5000 : nextm 

31040 Pr int"?i2ominciate a Preoccuparvi .• 

";n$ sprint"*"; 

31058 f or 1 =0to24 : P ok esc+1 , 0 : next 1 
3J060 fori = 1to38 : Print"#" ; 

:31070 p ok evo.. 15 : P ok e a 1 .■ 41 : p ok es 1 .• 89 : P ok e 
i..,i 1.. 17 : P ok eh 156 : P ok eli* 99 
31080 f or t= 1 to200 : nextt : P ok evo.■ 0 : P ok e a 1 .• 

0 : P ok ew 1 .• 0 : P ok es 1 .■ 0 
31090 nexti 

31100 P r i ntchr$ < 13 > : P r i nt " SETTroP P o tard i 
! !" ' Print"troPPO tardi ! !" : 9otol90 
31470 rem## 

31480 rem si to9lie la tuta 
31490 rem## 

31500 ifP =58then12080 
31510 ifP=59 thè rii 2080 
31520 i ffv02then31000 
31530 iffv=2theri 12080 
31570 rem## 

31580 rem se mangia le noci 
31590 rem## 

31600 i fno$= " noe i " or 1 ef tS < no$ > 5 > = " f ru.tt " 
ther.31620 

31610 9osu.b 19000 ■' P r i nt " :lJuh ! P erche vo 1 
ete man9iare 2WBHITO?" : 9oto5800 
31620 i fP =37thenP r i nt " i*3k ay. Mm ! buon saP 
ore ! " : 9oto316>50 

3 1630 i f ob’/. (. 3> »-1 thenP r i nt " gf:<k ay. Mm ! buo 
n sapore !" : 9oto31650 

31648 i fob/i < 3 > O-1 then9osub 19000 : P r i nt " :l 
Non avete nessun " > no$ : 9oto5000 
31650 ifz=lthen31790 

31660 9osub35100 : P rint" 3" : P rint" 5Fate un 
a Profonda inspirazione ";nf 
31670 PrinfliFotreste Provare una stran 
a sensazione Percorrervi il corpo "• 
31680 Print" e Potete respirare (felicem 
ente> senza la. vostra " '> 

31690 P r i nt " tuta. Potete to91 i er 1 a - " ; ob/J 



3 > =0 Z=1 : f v=2 : 9=9-1 : 9oto5000 
31700 9osub18000 ; P r int" SKJ2u.es t a volta no 
n sembra diverso. "j 

31710 Print"Blocca ancora il vostro sens 
o d i fame. " ■' obZ < 3 > =0 : 9otoS000 
31970 rem** 

31980 rem cristallo 
31990 rem** 

32000 Print "«Notate che il cristallo e" 
sparito dalla teca energetica. "> 

32010 Print"Senza di esso la nave non 
Può' volare!! Beve averlo 
32020 Print"Preso qualcuno! Dovete trova 
rio Prima che scaPPi." 

32030 return 
32040 rem *** 

32050 rem non Può' Prendere il rri«tallr, 
32060 rem *** ' ' 

32070 i fnof = " cr i sta 11 n " then320 c >0 
32030 9oto11700 

32090 ì f ev02then9osub 19000 : p r i nt " lon p 

otete... " : form=lto500 : nextm 

32100 i f ev02thenp r i nt "... ancora ! ! " : p r i n 

t"E' Ssotto a acqua. 9oto4320 

32110 ifev=2then11700 

32500 9osub18000:Print "m nord c'e' una 

citta' in rovina - a sud molti "; 

-2510 P r i nt " a 1 ber i arr i vano a 11 ' or i zzont 
e. Discendete." : 9oto4320 
32520 9osubl8000:Print"ÌR sud Potete ved 
ere la vostra navicella - ovunque "; 

32530 Print"alberi ed alberi ... Disr^nd 
ete.":9oto4320 

32540 9osub18000:Print"IR sud Potete ved 
ere del fumo salire al cielo. Può" " 

32550 Print"esserci vita o cose simili. 
Discendete. " : 9ot<-,4320 
32570 rem** 

32580 rem sabbie mobili 
32590 rem#* 

32600 P r i nt " -instate sP rotondando ne 11 e 
sabbie mobili, in breve vi sono alle 
32610 P rint"9inocchia.Eiso9na far qua1co 
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5 . 3 . ! ! " : q=0 : 9oto5000 
32670 rem## 

32680 rem dinosauro 
32690 rem*# 

32700 Pr inf'SPJn colossale dinosauro esce 
dagli alberi e vi taglia la strada. " ; 
32710 P r i nt"Non Potete Passare. " : 9oto50@ 
0 

32970 rem** 

32980 rem indigeni 
32990 rem** 

33080 Print" ab.na folla di indi Seni ostil 
i aPP are a11'iingresso de11a "i 
33010 Print"capanna - bloccando la via. 
Avanzano Puntandovi le lance alla "> 
33020 Print"9ola. Vogliono occuparsi di 
" ; : q =0 : 9oto5000 

33030 rem** 

33040 rem indietro alla capanna 
33050 rem** 

33060 Print"aindietro ancora!! Spero che 
abbiate Pensato a come dare ad 
33070 Print"aurora il bacio che vi aiute¬ 
rà- a Portarla via di qui!!" 

33080 na=0 : 4=0 : 9oto5000 

33100 rem liberazione illegale di aurora 

33120 ifnv<>2andno$ s "aurora"then33170 

33130 i fnv02andno$ s " P r i nc i P essa " then331 

70 

33148 i fnv02andnof= " Pr i nc i P essa " then331 
70 

33150 goto11700 

33170 9osub35100■P rint" S8" 

33180 P r i nt " 'JSP i acente ".: n$ : P r i nt " ma 91 i 
indigeni non amano i Piloti !!".■' 

33190 Print"e e vi hanno impedito di ten 
tare di liberarla." 

33200 Print"Vi hanno ucciso ! A questo v 
i ha Portato la via!!" : goto190 
33210 rem** 

33220 rem niente aurora 
33230 rem** 

33240 Pr int" SiF'erduta aurora, non Potete 
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comP l etare l a m i se i one . " •' return 
33250 rem#* 

33260 refi trovata aurora 
33270 reni## 

33280 9osu.b351 00 P r i nt " 51" 

33290 P r i nt " *EBlCon9r a tu 1 a 2 ioni 11 Avete 
compiuto la Missione!!" 

33300 Print"JlIDoPo solo Poche ore Potete 
decollare con l'astronave 
33310 Print"e tuffarvi nello spazio Prof 
ondo. " 

33320 Print" S1E la Principessa Aurora ha 
alla fine deciso di non sposare 
33330 Print"il crudele tiranno di Zen !! 
" : P r i nt " Prefer i sce vo i " ’> nt 
33340 Prinfelice l'avete fatta eh ?":pok 
ev+21, 0 : end 

33350 9osub13000 : P rint"Aurora vi bacia 
Per la fortuna che avete avuto nel "> 
33360 Print"trovare il cristallo ma9ico. 
":hh=2:9oto12090 
33370 rem'*# 

33380 refi trovato cristallo 
33390 refi** 

33400 9osub35100 : P r i nt" 51" •' P r i nt " 30k ay - 
cosi ' avete i1 cristallo ener9etico."; 
33410 Print"Ora tutto ciò' che dovete fa 
re e 1 ' trovare la Principessa!" 

33420 Print"Non dimenticate di lasciare 
■ì u i il cr i sta Ilo. " : 9oto21500 
33430 rem#* 

33440 rem niente cristallo 
33450 rem#* 

33460 9osub35100 : Pr int"51" : Print" flOka.y. a 
urora e' salva e voi Potete " 

33470 Print" lasciarla 4ui ss- volete. " : 9o 
to21508 

35000 Pokev+39,2 : P ok ev+27•1 : Pokev+23*1 : P 
okev+29,1 

35010 P ok ev+1100 • P ok ev .> 0 : P ok ev+21 .> 1 
35020 f orx=0to255 : P ok e 1 .. 1 .. y '■ nextx : p ok ev+1 f. 
, 1 

35038 forx=0to95 : P ok ev / x : nextx : p ok ev+16 .. 


236 





0 : P ok ev+21 , 0 
35040 return 


35100 forl=0to24 : pok esc+1, 0 : nextl 

35110 P ok evo .• 15 : P ok e a 1 ,190 : P ok ea.2 , 190 ; p o 

kea3 .< 190 : P ok ew 1,33 : P ok ew2.. 33 : P ok ew3129 

35120 P ok eh 1 .• 75 : P ok e 11 .• 69 : P ok eh2 * 212 : P ok 

e 12 .• 230 : P ok eh3,1 •’ P ok e 13,123 

35130 form= 1 to200steP. 25 : nextm 

35140 P ok ev+40, 4 : P ok e v+29 , 2 : P ok e v+23 , 2 

35150 P ok ev+2 , 80 : P ok ev+3 , 0 : Pok ev+21,2 

35160 f ory =0to 190 : P ok ev+3 , y : nexty 

35170 P ok ew 1 .■ 0 : P ok ea 1 , 0 : P ok eu>2 , 0 : P ok ea.2 , 

0 : P ok ew3 .■ 0 : P ok ea.3 .■ 0 

35180 return 

35200 data 99399 

35210 rem## 

35220 rem data aprite 1 
35230 rem** 


35240 data 255,128,0,255,128,0,1,128,0,1 
, 128 

35250 data 0,3,252,0,31,255,224,255,252, 
32,63 

35260 data 252,63,63, 255255,224,0, 1,63, 
255,240 

35270 da ta 63,255,240,3,1,0,3,25,0,3,31 
35280 data 0,227,8,0,255,0,0,0,0,8> 0 
35230 data 0,0,0, 0 , 0 , 0 , 0 , 0,0 
35338 data 0,112,0, 0 ,248,0,1,252,0,1,172 
35340 data 0,1,172,0,3,254.0,3,222,20,1 
35350 data 116,20,1,4,28,1,252,8,0,112,8 
35360 data 7,255,8,7,255,8,127,255,248,6 
3,1 

35370 data 0,229,253,0,255,253,0,4,1,0,7 
35380 data 255,0,7,255,0,1,36,0 
35420 restore -: forl1=1to1 000 : readaf : ifa$- 
"99999"then11-1016 
35430 next11 

35440 P ok e - 2041, 14 ■ P ok €'2040, 13 

35450 f or 11 =@to 126 : read4 •' P ok e332+11,4 : ne 

xtll 


35460 restore 
35470 return 
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Adventure e COMMODORE 64 è un manuale per ideare e utiliz¬ 
zare programmi di Adventure basate esclusivamente sul testo. 
Il processo di adattamento di una trama concepita nella mente 
agli schemi della programmazione, viene semplificato dall’uso di 
diagrammi, mappe e cartine. 

Una progettazione modulare del programma rende più facile la 
comprensione della struttura. Tutti i moduli sono spiegati in 
dettaglio, linea per linea, consentendo di assimilare i concetti di 
base utilizzati. L'abilità nella programmazione avrà modo di 
emergere durante la costruzione graduale dell’Adventure, per 
modificare il programma dimostrativo, o addirittura per costruir¬ 
ne uno nuovo. 

Il libro è diviso in due parti: 

1 ) una cornice semplificata per Adventure adatta per qualunque 
trama, che consente di capire come costruirne una da soli; 

2) un’Adventure completa, “Il pianeta dell’lncubo”, che introduce 
ai problemi e ai trabocchetti della programmazione di Adventure, 
con note ed anedotti per superarli. 


Cod. 571D ISBN 88-7056-172-0 
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